为了创建一个简单的示例,假设我正在try 绘制下面的矩阵,我想绘制该矩阵,并用不同的 colored颜色 表示每种类型.

> test
  Type Test1 Test2 Test3 Test4
1    1  0.50  1.50  2.50  3.50
2    1  1.00  2.00  3.00  4.00
3    1  0.25  1.25  2.25  3.25
4    1  0.75  1.75  2.75  3.75
5    2  0.20  1.20  2.20  3.20
6    2  0.41  1.41  2.41  3.41
7    2  0.83  1.83  2.83  3.83
8    2  0.63  1.63  2.63  3.63


matplot(t(test[,2:5]),type='l')

我try 了多种方法,甚至试图学习ggploy,但努力为我的数据弄清楚这一点.

推荐答案

实际上只用Type作为col=,不需要数据争论

> matplot(t(dat[, 2:5]), type='l', col=dat$Type)

enter image description here

您还可以个性化 colored颜色

> matplot(t(dat[,2:5]), type='l', col=c('#f38126', '#878286')[dat$Type])

enter image description here


Data:

> dput(dat)
structure(list(Type = c(1L, 1L, 1L, 1L, 2L, 2L, 2L, 2L), Test1 = c(0.5, 
1, 0.25, 0.75, 0.2, 0.41, 0.83, 0.63), Test2 = c(1.5, 2, 1.25, 
1.75, 1.2, 1.41, 1.83, 1.63), Test3 = c(2.5, 3, 2.25, 2.75, 2.2, 
2.41, 2.83, 2.63), Test4 = c(3.5, 4, 3.25, 3.75, 3.2, 3.41, 3.83, 
3.63)), class = "data.frame", row.names = c("1", "2", "3", "4", 
"5", "6", "7", "8"))

R相关问答推荐

R Lubridate:舍入/快照日期时间到一天中最近的任意时间?

基于现有类创建类的打印方法(即,打印tibles更长时间)

如何计算前一行的值,直到达到标准?

如果行和大于值,则过滤

gganimate在使用shadow_mark选项时不保留所有过go 的标记

为什么当用osmdata映射R时会得到相邻状态?

如何调整曲线图中的y轴标签?

计算满足R中条件的连续列

绘制采样开始和采样结束之间的事件

如何从容器函数中提取conf并添加到ggplot2中?

按组计算列中1出现的间隔年数

如何平滑或忽略R中变量的微小变化?

如何在R中使用混合GAM模型只对固定的影响因素进行适当的预测?

将列表中的字符串粘贴到R中for循环内的dplyr筛选器中

循环遍历多个变量,并将每个变量插入函数R

如何根据其他列中的两个条件来计算数据帧中的行之间的差异?

如何修改GT表中组名行的 colored颜色 ?

位置_道奇在geom_point图中不躲避

如何为包创建自定义roxygen2标签?

如何创建直方图与对齐的每月箱?