R直方图控制x轴值

Question

我有以下两个载体

 x<-c(-525,-520,-515,-460,-455,-450);
 y<-c(6,20,976,20,16,78);

我想绘制直方图，其中y向量表示频率，x向量表示x轴值

Answer 1

尝试使用它：

# replicate each element in x y-times
z <- rep(x,y)
hist(z)

Answer 2

dat <- data.frame(x=c(-525,-520,-515,-460,-455,-450), y=c(6,20,976,20,16,78))
barplot(dat$y, names.arg=dat$x, ylim=c(5,80), ylab=" frequency", xlab="x- Value")

Answer 3

# create df with required frequency
m<-unlist(mapply(rep,x,y))
#check
table(m)
hist(m)