R中带ggvis的多线图

我相信这是一个简单的问题，但我发现只有困难的答案。。。 我刚开始做一些R编程，我非常喜欢dplyr和ggvis包。。但是，我不知道如何在一个图中组合多个折线图。随着时间的推移，我测量了不同的样本，我的数据如下所示：

   time <-1:10
   m = matrix(c(2, 4, 3, 1, 5, 7),nrow=10,ncol=3,byrow = FALSE)
   colnames(m)<-c("sample1","sample2","sample3")
   mdata <- data.frame(time, m)
   data <-tbl_df(data)

有什么建议可以让ggvis发挥作用吗？我玩了一个for循环，但没有成功。。

---

多谢各位

您的问题是，您的数据需要采用长格式而不是宽格式，以便

ggvis

能够绘制它。您可以使用

tidyr

进行重塑。为了进一步的参考，我向您推荐这篇关于重组数据的文章

library(ggvis)
library(tidyr)
library(dplyr)

time <- 1:10
m <-  matrix(c(2, 4, 3, 1, 5, 7), nrow = 10, ncol = 3, byrow = FALSE)
colnames(m) <- c("sample1", "sample2", "sample3")
mdata <- data.frame(time, m)
data <- tbl_df(mdata)


# gather your data into long format
data <- data %>% 
  gather(sample, value, -time)

data %>%
  ggvis(~time, ~value, stroke = ~sample) %>%
  layer_lines()

库（ggvis）
图书馆（tidyr）
图书馆（dplyr）
时间是的，那正是我想要的！非常感谢你！！！我不知道ggvis中宽格式和长格式之间的区别！
library(ggvis)
library(tidyr)
library(dplyr)

time <- 1:10
m <-  matrix(c(2, 4, 3, 1, 5, 7), nrow = 10, ncol = 3, byrow = FALSE)
colnames(m) <- c("sample1", "sample2", "sample3")
mdata <- data.frame(time, m)
data <- tbl_df(mdata)


# gather your data into long format
data <- data %>% 
  gather(sample, value, -time)

data %>%
  ggvis(~time, ~value, stroke = ~sample) %>%
  layer_lines()