R语言绘制尺子的实现示例
短信预约 -IT技能 免费直播动态提醒
本文使用基本的绘图命令plot、rect、segments、text绘制一把长10厘米的直尺。话不多说上教程。
1、定义基本单位
xcm <- 0.07
ycm <- 0.072、首先使用plot绘制一个空白画布
plot(0:1, 0:1, type = "n", axes = F, ann = F)
3、绘制一个灰色的底作为直尺的影子
rect(0 + 0.2*xcm,0 - 0.2*ycm,0.95 + 0.2*xcm,0.15 - 0.2*ycm, col="gray", border = NA)
4、绘制一个白的底作为直尺
rect(0,0,0.95,0.15, col = "white")
5、标注刻度
segments(seq(1,11,0.1)*xcm,0,seq(1,11,0.1)*xcm,
c(rep(c(0.5, rep(0.25,4), 0.35,rep(0.25,4)), 10), 0.5)*ycm
)
6、标注数字以及单位
text(1:11*xcm, 0.6*ycm,0:10,adj = c(0.5, 0))
text(11.3*xcm, 0.6*ycm,"cm",adj = c(0, 0))
这样一个直尺就做好了
到此这篇关于R语言绘制尺子的实现示例的文章就介绍到这了,更多相关R语言绘制尺子内容请搜索编程网以前的文章或继续浏览下面的相关文章希望大家以后多多支持编程网！
免责声明：
① 本站未注明“稿件来源”的信息均来自网络整理。其文字、图片和音视频稿件的所属权归原作者所有。本站收集整理出于非商业性的教育和科研之目的，并不意味着本站赞同其观点或证实其内容的真实性。仅作为临时的测试数据，供内部测试之用。本站并未授权任何人以任何方式主动获取本站任何信息。
② 本站未注明“稿件来源”的临时测试数据将在测试完成后最终做删除处理。有问题或投稿请发送至: 邮箱/279061341@qq.com QQ/279061341
