如何在 R 中绘制线图？

Question

我正在尝试使用 R 制作 Excel 类型的线图，其中我的 x 轴是文本（A、B、c 等），y 轴（可以是负值和正值）是上下列。我想放弃红色而放弃绿色。

如果有人能在这方面帮助我，我将非常感激。我已经在 Excel 中绘制了此图，但我的数据中有数千行，并且 Excel 没有显示图中的所有文本点。

我的数据如下所示：

Name    UP  Downs
A   10  -3
B   2   -4
C   1   -1
D   4   -1
E   5   0
F   0   -1
G   6   -5
H   0   -1
I   7   -1
J   0   -1
K   0   -11
L   3   -1
M   0   -13
N   2   -1
O   0   -1
P   1   -1
Q   0   0
R   1   -1
S   0   0
T   12  -1

Answer 1

这可能不是最优雅的方法，但您可以使用 plot、points 和 axis (< code>axis 是主要的，它解释了如何更改轴上的标签）：?axis、?plot、?points。

首先制作一个与您类似的数据框，以便我可以演示...

# make a data frame similar to yours
mydf <- data.frame( Name=LETTERS, 
        Up=sample.int(15,size=26,replace=T), 
        Down=-sample.int(15,size=26,replace=T) )

现在绘制。

# set up a plot: x axis goes from 1 to 26,
# y limit goes from -15 to 15 (picked manually, you can work yours out
#   programmatically)
# Disable plotting of axes (axes=FALSE)
# Put in some x and y labels and a plot title (see ?plot...)
plot(0,xlim=c(1,26),ylim=c(-15,15),type='n',
     axes=FALSE,                 # don't draw axis -- we'll put it in later.
     xlab='Name',ylab='Change',  # x and y labels
     main='Ups and Downs')       #,frame.plot=T -- try if you like. ?plot.default
# Plot the 'Up' column in green (see ?points)
points(Up~Name,mydf,col='green')
# Plot the 'Down' column in red
points(Down~Name,mydf,col='red')
# ***Draw the x axis, with labels being A-Z 
#  (type in 'LETTERS' to the prompt to see what they are)
# see also ?axis
axis(1,at=1:26,labels=LETTERS)
# Draw the y axis
axis(2)

根据需要进行调整：?points 和 ?par< /code> 和 ?axis 在这方面特别有帮助。