Я не уверен, хотите ли вы сохранить информацию о том, откуда взяты значения (т. Е. Столбцы x или y. Если нет, то это легко:
df2 <- data.frame(xy = c(df$x,df$y), fact=c(df$fact, df$fact))
Если вы хотите сохранить информацию в fact
, то один из них:
### Method 1
df2 <- data.frame(xy = c(df$x,df$y),
fact=c(paste("x", df$fact, sep="."), paste("y", df$fact, sep=".") )
)
str(df2 )
'data.frame': 40 obs. of 2 variables:
$ xy : num 1.58043 -0.00399 0.84784 -0.10012 -0.27963 ...
$ fact: Factor w/ 10 levels "x.1","x.2","x.3",..: 1 2 3 4 5 1 2 3 4 5 ...
### Method 2
df2 <- stack(df[, 1:2])
df2$fact=df$fact
str(df2)
'data.frame': 40 obs. of 3 variables:
$ values: num 1.58043 -0.00399 0.84784 -0.10012 -0.27963 ...
$ ind : Factor w/ 2 levels "x","y": 1 1 1 1 1 1 1 1 1 1 ...
$ fact : int 1 2 3 4 5 1 2 3 4 5 ...