r - 以多种颜色绘制列表列表中的元素

Question

我试图从列表列表中绘制元素，特别是根据它所属的类为每个点着色，使用外部列表索引作为 x 值，使用内部列表的每个元素的值作为 y 值。一个示例列表，包含 2 个子列表:

sample.list <- list(list("A"=0,"B"=0.14285, "C"=0.75), list("A"=0.138,"B"=0,"C"=0.1))
[[1]]
[[1]]$A
[1] 0

[[1]]$B
[1] 0.14285

[[1]]$C
[1] 0.75

[[2]]
[[2]]$A
[1] 0.138

[[2]]$B
[1] 0

[[2]]$C
[1] 0.1

我想要的输出将在点处绘制第一个子列表
(1, 0), (1, 0.14285), (1, 0.5)
(即子列表元素沿着 x=1 形成一条垂直线)并且第二个子列表将被类似地绘制。此外，每个子列表元素都有不同的颜色 - A可能是红色， B绿色等只是为了澄清，我试图在一张图表上完成所有这些。此外，列表元素的数量可能会因数据集而异。非常感谢有关如何解决此问题的任何指示!

Answer 1

library(plyr)
library(ggplot2)
library(reshape2)
df <- melt(ldply(sample.list, data.frame))
df2 <- ddply(df, .(variable), function(x) { x$index <- 1:nrow(x); x})
ggplot(df2, aes(index, value, color = variable)) + 
geom_point(size=3) + scale_x_continuous(breaks = seq(1:max(df2$index)))