使用 R 中的数据点名称绘制一维图

发布于 2024-12-04 11:44:53 字数 149 浏览 1 评论 0原文

我有一个数据点列表（0.2、0.8、0.95），我想将它们绘制在一条线上。我想创建此范围值的一维刻度（垂直或水平），并将这些数据点的名称（苹果、香蕉、西红柿）与位于刻度上的数据点并列。我知道包中有一个相对简单的功能，但我再也找不到它了！请帮忙:)。

谢谢你，安妮玛丽

原文

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

终遇你 2024-12-11 11:44:54

我想到的第一件事就是手动完成：

plot(rep(1,3),c(0.2, 0.8, 0.95),ylim=c(0,1),axes=F,xlab="",ylab="",type="o",pch=19)
axis(side=2)
text(rep(1,3),c(0.2, 0.8, 0.95),c("apples", "bananas", "tomatoes"),pos=4,xpd=T)

在此处输入图像描述

因为这样你就有了完全的控制权。还有一个名为 stripchart() 的函数，它可以进行一维绘图：

stripchart(c(0.2, 0.8, 0.95),vertical=T)
text(rep(1,3),c(0.2, 0.8, 0.95),c("apples", "bananas", "tomatoes"),pos=4)

The first thing t come to my mind was to do it by hand:

plot(rep(1,3),c(0.2, 0.8, 0.95),ylim=c(0,1),axes=F,xlab="",ylab="",type="o",pch=19)
axis(side=2)
text(rep(1,3),c(0.2, 0.8, 0.95),c("apples", "bananas", "tomatoes"),pos=4,xpd=T)

enter image description here

because then you have full control. There is also a function called stripchart(), that does 1-d plotting:

stripchart(c(0.2, 0.8, 0.95),vertical=T)
text(rep(1,3),c(0.2, 0.8, 0.95),c("apples", "bananas", "tomatoes"),pos=4)

enter image description here
neither is very beautiful, but you can take it from there.

回复收藏 0 原文

心不设防 2024-12-11 11:44:54

不确定是否有一个函数可以做到这一点，我能想到的最接近的是 if dotchart 但它不一样。但是，这样怎么样：

dat <- c(0.2,0.8,0.95)
names(dat) <- c("apples","bananas","tomatoes")
plot(c(1,1),range(dat),type="l",col="lightgrey",xlab="",xaxt="n")
points(rep(1,length(dat)),dat)
text(1,dat,names(dat),pos=4)

结果是：

在此处输入图像描述

Not sure about a function to do this, closest I can think of if dotchart but its not the same. However, how about this:

dat <- c(0.2,0.8,0.95)
names(dat) <- c("apples","bananas","tomatoes")
plot(c(1,1),range(dat),type="l",col="lightgrey",xlab="",xaxt="n")
points(rep(1,length(dat)),dat)
text(1,dat,names(dat),pos=4)

Which results in:

enter image description here

回复收藏 0 原文

猫卆 2024-12-11 11:44:54

我在 vegan 库中找到了一个方便的函数来执行此操作：

x <- c(1,3.4,7,8,9,15,19)
names <- c("apple","pear","banana","grapefruit","orange","tomato","cucumber")
library(vegan)
linestack(x, names, side = "left")

希望它对某些人有用。

I found a handy function in the vegan library to do this:

x <- c(1,3.4,7,8,9,15,19)
names <- c("apple","pear","banana","grapefruit","orange","tomato","cucumber")
library(vegan)
linestack(x, names, side = "left")

Hopefully it is of use to somebody some time.

回复收藏 0 原文

~没有更多了~