Thanks for your interest in my GpU paper. I am glad that your find Fig 1C "a very nice representation for plotting the histogram of angle".
Per your request, here is the detailed step-by-step procedure I originally used to generate Fig 1C, up to the "raw" histogram of the phase angle of sugar ring pseudorotation.
- The data file named "key_pars_gu193.txt" is attached. It contains the phase angle of pseudorotation of the U and G sugar rings.
- The following R script is used to generate the "raw" figure (attached).
library("circular")
pdat <- read.delim("key_pars_gu193.txt")
attach(pdat)
xfig(file="sugar_raw.fig", onefile=TRUE)
par(mfrow = c(1,2))
plot(circular(p1, units="degrees", rotation="clock"), zero=pi/2,
stack=TRUE, bins=150, shrink=1.5)
plot(circular(p2, units="degrees", rotation="clock"), zero=pi/2,
stack=TRUE, bins=150, shrink=1.5)
par(mfrow = c(1,1))
dev.off()
Please note the followings:
[attachment=1:1vq0n9no]key_pars_gu193.txt[/attachment:1vq0n9no]
[attachment=0:1vq0n9no]sugar_raw.png[/attachment:1vq0n9no]
HTH,
Xiang-Jun