我试图复制SensoMinR包(卡通消费者)的输出。包中的示例数据集"hedo.cocktail“似乎包含一个数字作为标题。
data(cocktail)
View(hedo.cocktail)
但是,当我试图导入具有相同结构的虚拟数据时(1,2,3,.作为表示消费者数量的标题)。标题由RStudio自动添加"X“。问题是包含“X头”的数据集没有产生输出。另一方面,犯错误。
Subscript out of bounds in Mat[rownames(MatH),]
我的猜测是,问题似乎是数据头与示例数据集不匹配。
是否可以以数字作为头导入数据?
这是我的虚拟数据样本。谢谢你的建议。
senso.cake
color odor flavor size
25.000 45.000 25.000 78.000
26.000 56.000 49.000 45.000
27.000 54.000 85.000 45.000
28.000 52.000 98.000 58.000
30.000 58.000 56.000 96.000
31.000 56.000 32.000 96.000
32.000 58.000 56.000 93.000
36.000 59.000 45.000 90.000
hedo.cake
1 2 3 4 5 6 7 8 9 10
9 7 7 4 8 9 6 7 8 7
6 4 4 2 4 7 8 7 7 7
7 6 8 7 7 6 7 7 7 6
8 8 6 4 7 8 6 8 6 8
4 5 7 3 8 6 6 8 6 7
7 6 7 3 7 6 6 7 7 8
8 6 8 6 7 7 8 7 4 9
6 3 5 6 4 4 6 7 2 7
发布于 2021-12-17 07:25:21
您可以将数据帧转换为矩阵。
mat <- as.matrix(your_df)
mat <- matrix(data = mat, dimnames = NULL, ncol = ncol(your_df))
之后,您可以简单地重新绑定()任何您想要的标题。
mat <- rbind(c(1:ncol(mat)), mat)
例如:
a <- c(5:8)
b <- c(4:7)
c <- c(3:6)
mat <- matrix(c(a,b,c), ncol = 3)
mat <- rbind(c(1:ncol(mat)), mat)
mat
[,1] [,2] [,3]
[1,] 1 2 3
[2,] 5 4 3
[3,] 6 5 4
[4,] 7 6 5
[5,] 8 7 6
https://stackoverflow.com/questions/70389537
复制相似问题