2013-08-12 41 views

Trả lời

12

Sử dụng một tạo thành Ví dụ:

# example data: 
dat <- list(a=1:5,b=2:7,c=3:10) 
# get plotting: 
plot(unlist(dat),type="n",xlim=c(1,max(sapply(dat,length)))) 
mapply(lines,dat,col=seq_along(dat),lty=2) 
legend("topleft",names(dat),lty=2,col=seq_along(dat)) 

enter image description here

9

Không nghi ngờ sẽ được hoàn thành mà không có một câu trả lời ggplot.

dat <- list(a=1:5,b=2:7,c=3:10) 
dat <- lapply(dat, function(x) cbind(x = seq_along(x), y = x)) 

list.names <- names(dat) 
lns <- sapply(dat, nrow) 
dat <- as.data.frame(do.call("rbind", dat)) 
dat$group <- rep(list.names, lns) 

library(ggplot2) 

ggplot(dat, aes(x = x, y = y, colour = group)) + 
    theme_bw() + 
    geom_line(linetype = "dotted") 

enter image description here

Để vẽ mỗi dòng trong một âm mưu riêng, sử dụng

ggplot(dat, aes(x = x, y = y, colour = group)) + 
    theme_bw() + 
    geom_line(linetype = "dotted") + 
    facet_wrap(~ group) 
+0

'dat $ nhóm <- đại diện (tên (dat), LNS) 'sẽ đảm bảo phù hợp với các tên trong nhóm của bạn. – thelatemail

+0

@thelatemail chỉnh sửa câu trả lời của tôi. –

+0

bạn có thể có mỗi nhóm trong cửa sổ cốt truyện của chính nó. như một âm mưu khía cạnh. – MySchizoBuddy

Các vấn đề liên quan