在R中绘制多次重复

Question

我有以下数据集：

Class      R1    R2    R3    R4    R5
Operator   6.5   2     18    3.6   5.1
Assest     1.3   9.5   6     6.3   7.5
Operator   10    5     9     2.2   7.5
Execute    6.3   4     2.5   9     9
Execute    6     5     5     5     1.6
Assest     6     2.5   6.6   7     7.9
Operator   10    5     13    5   7.5
Assest     5     2.5   6.6   9     7.9

我想为每个类生成一个多个图，其中每个单独的图表示单个运行（每个多个图将基于该示例具有三个图）。

我开始做以下事情：

data <- read_csv("/home/adam/Desktop/dataa.csv")
dataset <- data %>% melt(id.vars = c("Class"))
p2_data <- dataset %>% filter(Class == "Operator")
pp2 <- p2_data %>% ggplot(aes(x=variable, y=value, group=Class, colour=Class)) + 
  geom_line() + 
  scale_x_discrete(breaks = seq(0, 1000, 100)) + 

但这只能给我一个包含所有跑步的一个类的情节，这不是我想要的。能帮我解决这个问题吗？

Answer 1

如果我正确地理解了你的问题，你想为三个Classes中的每一个都有单独的图，每行观察一行（Assest为3，Execute为2，Operator为3），或许下面有帮助？

data %>% 
  group_by(Class) %>% 
  mutate(run=row_number()) %>% 
  melt(id.vars = c("Class", "run")) %>% 
  mutate(run=as.factor(run)) %>% 
  ggplot(aes(variable, value, colour=run, group=run)) + 
  geom_point() + geom_line() + facet_wrap(~Class)