99999久久久久久亚洲,欧美人与禽猛交狂配,高清日韩av在线影院,一个人在线高清免费观看,啦啦啦在线视频免费观看www

熱線電話：13121318867

登錄

啊啊啊啊啊吖

2018-10-24 閱讀量: 1084

關(guān)于數(shù)據(jù)框拉直的問題

matrixdata <- read.csv(file = "2line14dayrelable.csv", header = F)

生成了一個數(shù)據(jù)框，我想把它變成類似

17，17，0.7218648

17，18，3.7775223

類似這種，把這個矩陣形式拉直，變成X,Y,Z形式

我把數(shù)據(jù)框變成了矩陣，使用了一個自編函數(shù)

matrix.grid<-function(matrix)

{

??data.<-numeric()

??x<-numeric()

??y<-numeric()

 

??for(i in 2:dim(matrix)[1])

??{

? ? for(j in 2:dim(matrix)[2])

? ? {

? ?? ?x<-c(x,i)

? ?? ?y<-c(y,j)

? ?? ?data.<-c(data.,matrix[i,j])

? ? }

??}

??data.frame(x,y,z=data.)

########解決方法參考：xx <- read.csv("2line14dayrelable.csv")

library(reshape)

x2 <- melt(xx,id="X")

x2variable<?as.numeric(gsub("X","",x2variable))

x2