Code: |
path = "D:\WIAS talk\XploRe program\"
library("plot")
v1 = read(path+"vol_fx.txt")
leng1 = v1[,2]
v2 = read(path+"vol_kupfer.txt")
leng2 = v2[,2]
leng = leng1|leng2
theFactor = string("1. Exchange rate", 1:rows(v1)) | string("2. Bank portfolio", 1:rows(v2))
plotbox(leng, theFactor)
setgopt(boxplot,1,1,"xaxis",0,"yaxis",0 ,"border",0)
|