#R version 2.3, www.r-project.org
#Eurostat GDP constant prices, percentage change on previous period
#Latvia 1996 - 2006
x <- c(3.9,8.4,4.7,3.3,6.9,8.0,6.5,7.2,8.7,10.6,11.9)
names(x) <- 1996:2006
library("RSvgDevice")
devSVG("lv_real_gdp_growth.svg", width = 15, height = 12)
par(mar=c(3.2,4,1,1),las=1,mgp=c(2.2,1,0),cex=2)
y <- barplot(x,ylim=c(0,14),ylab="%",
             space=.4,col="steelblue2",xlim=c(.2,16),xaxs="i")
text(y,x+.3,format(x,digits=2))
axis(1,c(.2,y+.7),labels=F)
dev.off()

 

本W3C状态不明的矢量图使用R创作.

本作品已被作者Jkv释出到公有领域。这适用于全世界。 在一些国家这可能不合法；如果是这样的话，那么： Jkv无条件地授予任何人以任何目的使用本作品的权利，除非这些条件是法律规定所必需的。