R语言 把矩阵捋直了的函数（矩阵转换为数据框）
转换后可直接用于levelplot等函数
matrix.grid<-function(matrix)
{
data.<-numeric()
x<-numeric()
y<-numeric()
for(i in 1:dim(matrix)[1])
{
for(j in 1:dim(matrix)[2])
{
x<-c(x,i)
y<-c(y,j)
data.<-c(data.,matrix[i,j])
}
}
data.frame(x,y,z=data.)
}
*******************************************——————-**********************************
matrix.grid<-function(matrix)
{
data.<-numeric()
x<-numeric()
y<-numeric()
for(i in 1:dim(matrix)[1])
{
for(j in 1:dim(matrix)[2])
{
x<-c(x,i)
y<-c(y,j)
data.<-c(data.,matrix[i,j])
}
}
data.frame(x,y,z=data.)
}
转载请注明：数据分析 » R语言 把矩阵捋直了的函数（矩阵转换为数据框）
