r - 在R中如何使Y轴值以百分比为单位

Question

我正在绘制带有预测的时间序列图。我需要将 Y 轴值作为百分比。如何进行此操作。请明确说明。

val <- sqlQuery(dbhandle, 'select COUNT(*) from Admission where YEAR(YearOFRegistration)=2006 and YEAR(Admission)=2006); 
Ttl <- sqlQuery(dbhandle, 'select COUNT(*) from Admission where YEAR(YearOFRegistration)=2006');
 firstyr<-(val/Ttl)*100

我每年计算的方式相同。

>  YrTimeSeries <- c(firstyrs,secyr,thirdyr,forthyr,fifthyr)
tsValue<-ts(YrTimeSeries,frequency=1,start=2006)
library(forecast)
plot(forecast(tsValue,h=5))

预测值为

Point Forecast    Lo 80    Hi 80    Lo 95    Hi 95
2011        86.9993 72.19680 101.8018 64.36083 109.6378
2012        86.9993 66.06645 107.9321 54.98528 119.0133
2013        86.9993 61.36233 112.6363 47.79094 126.2077
2014        86.9993 57.39653 116.6021 41.72576 132.2728
2015        86.9993 53.90256 120.0960 36.38220 137.6164

我正在做未来6年的预测。我已经包含了 2006 年到 2010 年的数据并以百分比计算。我担心的是我想以接受addmision的儿童百分比来预测值。请详细说明我哪里出错了。

Answer 1

只需重新定义您的 Y 变量

x = sort(rnorm(100))
y = x * 2 + rnorm(100)
plot(x,y, type='b') # plain data
plot(x,y/max(y)*100, type='b') # Y-axis in percentage