所以我有一个 5 行 20 列的数据集。
我正在尝试绘制一个hist3D
来自plot3D
包裹。
dt = structure(c(1, 1, 1, 3, 1, 2, 1, 0, 2, 1, 2, 1, 0, 1, 1, 0, 1,
0, 2, 2, 1, 1, 1, 1, 4, 4, 1, 1, 2, 3, 8, 1, 1, 2, 1, 10, 0,
1, 2, 1, 9, 0, 2, 4, 0, 4, 0, 5, 2, 2, 2, 0, 1, 2, 4, 1, 1, 3,
2, 6, 8, 1, 2, 2, 4, 10, 0, 2, 2, 4, 7, 0, 7, 1, 4, 11, 0, 4,
1, 2, 15, 0, 4, 2, 3, 16, 2, 7, 2, 2, 18, 3, 9, 0, 1, 15, 0,
15, 0, 2), .Dim = c(5L, 20L), .Dimnames = list(c("f Housework",
"g Odd jobs", "h Eating", "i Child care", "j Care for others"
), c("V1", "V2", "V3", "V4", "V5", "V6", "V7", "V8", "V9", "V10",
"V11", "V12", "V13", "V14", "V15", "V16", "V17", "V18", "V19",
"V20")))
直方图
hist3D(x = 1:5, z = dt, scale = T, col = jet.col(100, alpha = 0.3), add = F, colkey = F, ticktype = "detailed")
我想要的是
更换x-axis
(1:5) 通过 row.names ("f Housework",
"g Odd jobs", "h Eating", "i Child care", "j Care for others"
)
而不是每个都具有相同的颜色x
变量,我的数据行,(1:5,"f Housework",
"g Odd jobs", "h Eating", "i Child care", "j Care for others"
),
我想为每一行设置不同的颜色(如果可能的话,使用不同的“热图”序列颜色)。
我想要的是这样的(我知道手动绘制):
有什么建议吗?