[下载] R色卡代码

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

R的作图功能是很强大的

可惜没有提供比较完整的色卡

这是一份标准的R的色卡

希望大家能做出漂亮的图。

199576.pdf (54.03 KB)

2008-3-20 20:03:00 上传

[下载] R色卡代码

[此贴子已经被作者于2008-3-20 20:03:21编辑过]

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：很强大 下载 代码 色卡

不错

挺清楚的

解决了好多麻烦

谢谢楼主。

不错，赞一个！

你简直是坑人!败类.

看看怎么样呢!怎么评论不一致呢!!

还可以吧

我感觉还不错

657种颜色全部都可以查出来的

貌似是直接用R输出的

要是楼主在提供一下R的代码就更好了

期待~~~~~~~~

pdf(file="R colors show.pdf",width=13,height=13)

par(col.main="blue")
x<-c(rep(1:8,82),1)
y<-c(rep(83:2,rep(8,82)),1)
texts<-colors()
plot(0,0,type='n',axes=F,xaxt='s',yaxt='s',xlab='',ylab='',xlim=c(1,8),ylim=c(1,83),main="colors()")
text(x,y,texts,col=colors())

dev.off()

嘿嘿

其实比较简单的

是这个寒假学习R的时候搞的

就那么几行

忍不住的將程式碼作了點小修正, 借花獻佛.

pdf(file="RColors.pdf", width=13, height=13)
op <- par(mar=c(2, 2, 2, 2) + .1)
plot(c(1, 8), c(1, 83), type="n",
     axes=FALSE, xlab="", ylab="",
     main="\n\ncolors()", col.main="blue")
text(c(rep(1:8, 82), 1), c(rep(83:2, rep(8, 82)), 1),
     colors(), col=colors())
par(op)
dev.off()

[此贴子已经被作者于2008-8-29 8:19:20编辑过]

kankan