用ggplot2绘制不同长度的矢量图

Question

我有8个不同长度的数据向量(MAP分数)(不同的文档数量),从80到500.如何将它们读取到R并在ggplot2中将它们绘制成相同的长度？考虑它们不同数量的数据点,范围从0到1.它们应按比例缩小/缩小,以便它们适合相同的图形.并为图片添加更平滑的效果.分数范围从0到1.例如,我有矢量

vec1 = [1,0.8,0.6,0.8,0.6,0.6] # => +
vec2 = [1,0.8,0.6,0.4] # => *

情节应如下:

+   
  +*  +
    +  *+  +
           *

但有线条.

Answer 1

干得好.

dat <- list(
  vec1 = c(1,0.8,0.6,0.8,0.6,0.6), # => +
  vec2 = c(1,0.8,0.6,0.4) # => *)
)

addX01 <- function(x, label="A"){
  n <- length(x) - 1
  data.frame(x=seq(0, 1, by=(1/n)), y=x, label=label)
}

raggedListToDf <- function(x, labels=LETTERS[seq_along(x)]){
  do.call(rbind, lapply(seq_along(x), function(i) addX01(x[[i]], label=labels[i])))
}


plotData <- raggedListToDf(dat, labels=c("*", "+"))

ggplot(plotData, aes(x, y, label=label, group=label)) + geom_text()