安装程序包("叶肉的")

安装程序包("遥控器")遥控器::安装github("古宇宙/植物")

#负载rphylopic图书馆(叶肉的)#获取一个物种的单个图像uuid
乌伊德 <-获取用户ID(名称 = "灰狼",n个 = 1)#获取uuid的图像
国际货币基金组织 <-获取植物(乌伊德 = 乌伊德)#但每个物种可以有多个轮廓。。。
乌伊德 <-获取uuid(名称 = "灰狼",n个 = 5)

#我该怎么挑选？！
#如果看不到图像本身就很难，让我们使用：
国际货币基金组织 <-选择_植物(名称 = "灰狼",n个 = 5)

#好了，现在我们得到了想要的图像。。。让我们把它加到一个情节中！绘图(x个 = 1,年 = 1,类型 = "n个")添加基本类(国际货币基金组织 = 国际货币基金组织,x个 = 1.25,年 = 1.25,高度 = 0.25)#但我们不能直接使用uuid添加图像吗？当然！
乌伊德 <-获取uuid(名称 = "灰狼",n个 = 1)添加基本类(乌伊德 = 乌伊德,x个 = 1,年 = 1,高度 = 0.25)#只使用链接到名称的第一个图像怎么样？一定地！添加_专题_基础(名称 = "灰狼",x个 = 0.75,年 = 0.75,高度 = 0.25)#黑色有点无聊吗？好 啊。。。添加基本类(名称 = "灰狼",x个 = 0.75,年 = 1.25,高度 = 0.25,颜色 = "橙色")

#所有这些功能都可用于ggplot2。。。
#但我们使用add_phylopic和geom_phylobic！图书馆(ggplot2)#获取图像
乌伊德 <-获取uuid(名称 = "鸢尾花",n个 = 1)国际货币基金组织 <-获取植物(乌伊德 = 乌伊德)#在情节背后放置剪影ggplot图(虹膜)+添加植物（_P）(x个 = 6.1,年 = 3.2,国际货币基金组织 = 国际货币基金组织,阿尔法 = 0.2)+地理点（aes(x个 = 萼片。长度,年 = 萼片。宽度))#将轮廓绘制为点！ggplot图(虹膜)+地貌（aes(x个 = 萼片。长度,年 = 萼片。宽度),国际货币基金组织 = 国际货币基金组织,颜色 = "紫色",高度 = 0.25)

#PhyloPic有很多贡献者，我们应该承认
#他们的工作。您可以使用get_attribution获取有关图像的数据

#获取有效的uuid
乌伊德 <-获取uuid(名称 = "蜂猴属")#获取uuid的属性数据获取属性（_A）(乌伊德 = 乌伊德)

#如何保存图像？
#获取图像
国际货币基金组织 <-选择_植物(名称 = "灰飞虱",n个 = 1)#保存图像保存原文件(国际货币基金组织 = 国际货币基金组织)