R version 3.0.2 (2013-09-25) -- "Frisbee Sailing"
Copyright (C) 2013 The R Foundation for Statistical Computing
Platform: x86_64-apple-darwin10.8.0 (64-bit)

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

  Natural language support but running in an English locale

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

[R.app GUI 1.62 (6558) x86_64-apple-darwin10.8.0]

[Workspace restored from /Users/sandhyatiwari/.RData]
[History restored from /Users/sandhyatiwari/.Rapp.history]

> psplotfilename="Metric_bundle_rotation_translation.eps"
> > postscript(psplotfilename, height=4, width=3.5,pointsize=10, horizontal=FALSE, onefile=FALSE, paper='special')
Error: unexpected '>' in ">"
> > plot(bundle_rot[,2],xaxt="n",xlab="PDB ID.",ylab=expression(Omega[w]),ylim=c(45,250),col="red",cex=1.5,)
Error: unexpected '>' in ">"
> 
> psplotfilename="Metric_bundle_rotation_translation.eps"
> postscript(psplotfilename, height=4, width=3.5,pointsize=10, horizontal=FALSE, onefile=FALSE, paper='special')plot(bundle_rot[,2],xaxt="n",xlab="PDB ID.",ylab=expression(Omega[w]),ylim=c(45,250),col="red",cex=1.5,)
Error: unexpected symbol in "postscript(psplotfilename, height=4, width=3.5,pointsize=10, horizontal=FALSE, onefile=FALSE, paper='special')plot"
> psplotfilename="Metric_bundle_rotation_translation.eps"
> postscript(psplotfilename, height=4, width=3.5,pointsize=10, horizontal=FALSE, onefile=FALSE, paper='special')plot(bundle_rot[,2],xaxt="n",xlab="PDB ID.",ylab=expression(Omega[w]),ylim=c(45,250),col="red",cex=1.5,)
Error: unexpected symbol in "postscript(psplotfilename, height=4, width=3.5,pointsize=10, horizontal=FALSE, onefile=FALSE, paper='special')plot"
> psplotfilename="Metric_bundle_rotation_translation.eps"
> postscript(psplotfilename, height=4, width=3.5,pointsize=10, horizontal=FALSE,
+ onefile=FALSE, paper='special')
> plot(bundle_rot[,2],xaxt="n",xlab="PDB ID.",ylab=expression(Omega[w]),ylim=c(45,250),col="red",cex=1.5,)
> axis(1,labels=c("1N55","1KKO","1E15","3CH0","3CWN"),at=c(1:5))
>  points(bundle_rot[,1],cex=1.5)
> points(bundle_trans[,1],cex=1.5,pch=19)
> points(bundle_trans[,2],cex=1.5,pch=19,col="red")
> legend("topright",pch=c(15,15,1,19),col=c("black","red","black","black"),c("Alpha helical bundle","Beta barrel core", "Rotation","Translation"))
> dev.off()
null device 
          1 
> psplotfilename="Metric_bundle_rotation_translation.eps"
> postscript(psplotfilename, height=4, width=3.5,pointsize=10, horizontal=FALSE,
+ onefile=FALSE, paper='special')
> plot(bundle_rot[,2],xaxt="n",xlab="PDB ID.",ylab=expression(Omega[w]),ylim=c(45,250),col="red",cex=1.5,)
> axis(1,labels=c("1N55","1KKO","1E15","3CH0","3CWN"),at=c(1:5))
> points(bundle_rot[,1],cex=1.5)
> points(bundle_trans[,1],cex=1.5,pch=19)
> points(bundle_trans[,2],cex=1.5,pch=19,col="red")
> legend("topright",pch=c(1,19,1,19),col=c("black","red","black","red"),c("Helical bundle rotation","Beta barrel rotation", "Helical bundle translation","Beta barrel translation"))
> dev.off()
null device 
          1 
> psplotfilename="Metric_bundle_rotation_translation.eps"
> postscript(psplotfilename, height=4, width=3.5,pointsize=10, horizontal=FALSE,
+ onefile=FALSE, paper='special')
> plot(bundle_rot[,2],xaxt="n",xlab="PDB ID.",ylab=expression(Omega[w]),ylim=c(45,250),col="red",cex=1.5,)
> axis(1,labels=c("1N55","1KKO","1E15","3CH0","3CWN"),at=c(1:5))
> points(bundle_rot[,1],cex=1.5)
> points(bundle_trans[,1],cex=1.5,pch=19)
> points(bundle_trans[,2],cex=1.5,pch=19,col="red")
> legend("topright",pch=c(1,19,1,19),col=c("black","black","red","red"),c("Alpha helical bundle rotation","Alpha helical bundle translation", "Beta barrel rotation","Beta barrel translation"))
> dev.off()
null device 
          1 
> psplotfilename="Metric_bundle_rotation_translation.eps"
> postscript(psplotfilename, height=4, width=3.5,pointsize=10, horizontal=FALSE,
+ onefile=FALSE, paper='special')
> plot(bundle_rot[,2],xaxt="n",xlab="PDB ID.",ylab=expression(Omega[w]),ylim=c(45,250),col="red",cex=1.5,)
> axis(1,labels=c("1N55","1KKO","1E15","3CH0","3CWN"),at=c(1:5))
> points(bundle_rot[,1],cex=1.5)
> points(bundle_trans[,1],cex=1.5,pch=19)
> points(bundle_trans[,2],cex=1.5,pch=19,col="red")
> legend("topright",pch=c(1,19,1,19),col=c("black","black","red","red"),c("Helical bundle rotation","Helical bundle translation", "Beta barrel rotation","Beta barrel translation"))
> dev.off()
null device 
          1 
> psplotfilename="Metric_bundle_rotation_translation.eps"
> postscript(psplotfilename, height=4, width=3.5,pointsize=10, horizontal=FALSE,
+ onefile=FALSE, paper='special')
> plot(bundle_rot[,2],xaxt="n",xlab="PDB ID.",ylab=expression(Omega[w]),ylim=c(40,260),col="red",cex=1.5,)
> axis(1,labels=c("1N55","1KKO","1E15","3CH0","3CWN"),at=c(1:5))
> points(bundle_rot[,1],cex=1.5)
> points(bundle_trans[,1],cex=1.5,pch=19)
> points(bundle_trans[,2],cex=1.5,pch=19,col="red")
> legend("topright",pch=c(1,19),col=c("black","black"),c("Helical bundle rotation","Helical bundle translation"))
> legend("topleft",pch=c(1,19),col=c("red","red"),c("Beta barrel rotation","Beta barrel translation"))
> dev.off()
null device 
          1 
> psplotfilename="Metric_bundle_rotation_translation.eps"
> postscript(psplotfilename, height=4, width=3.5,pointsize=10, horizontal=FALSE,
+ onefile=FALSE, paper='special')
> plot(bundle_rot[,2],xaxt="n",xlab="PDB ID.",ylab=expression(Omega[w]),ylim=c(40,260),col="red",cex=1.5,)
> axis(1,labels=c("1N55","1KKO","1E15","3CH0","3CWN"),at=c(1:5))
> points(bundle_rot[,1],cex=1.5)
> points(bundle_trans[,1],cex=1.5,pch=19)
> points(bundle_trans[,2],cex=1.5,pch=19,col="red")
> legend("topright",pch=c(1,19,1,19),col=c("black","black","red","red"),c("Helical bundle rotation","Helical bundle translation", "Beta barrel rotation","Beta barrel translation"))
> dev.off()
null device 
          1 
> psplotfilename="Metric_bundle_rotation_translation.eps"
> postscript(psplotfilename, height=4, width=3.5,pointsize=10, horizontal=FALSE,
+ onefile=FALSE, paper='special')
> plot(bundle_rot[,2],xaxt="n",xlab="PDB ID.",ylab=expression(Omega[w]),ylim=c(40,260),col="red",cex=1.5,)
> axis(1,labels=c("1N55","1KKO","1E15","3CH0","3CWN"),at=c(1:5))
> points(bundle_rot[,1],cex=1.5)
> points(bundle_trans[,1],cex=1.5,pch=19)
> points(bundle_trans[,2],cex=1.5,pch=19,col="red")
> legend("topright",pch=c(1,19,1,19),col=c("black","black","red","red"),c(expression(alpha)+" bundle rotation",expression(alpha)+" bundle translation", expression(beta)+" barrel rotation",expression(beta)+" barrel translation"))
Error in expression(alpha) + " bundle rotation" : 
  non-numeric argument to binary operator
> legend("topright",pch=c(1,19,1,19),col=c("black","black","red","red"),c(expression(alpha)" bundle rotation",expression(alpha)" bundle translation", expression(beta)" barrel rotation",expression(beta)" barrel translation"))
Error: unexpected string constant in "legend("topright",pch=c(1,19,1,19),col=c("black","black","red","red"),c(expression(alpha)" bundle rotation""
> legend("topright",pch=c(1,19,1,19),col=c("black","black","red","red"),c(expression(pastalpha)" bundle rotation",expression(alpha)" bundle translation", expression(beta)" barrel rotation",expression(beta)" barrel translation"))
Error: unexpected string constant in "legend("topright",pch=c(1,19,1,19),col=c("black","black","red","red"),c(expression(pastalpha)" bundle rotation""
> 
> legend("topright",pch=c(1,19,1,19),col=c("black","black","red","red"),c(expression(paste(alpha," bundle rotation")),expression(paste(alpha," bundle translation")), expression(paste(beta," barrel rotation")),expression(paste(beta," barrel translation")))
+ )
> dev.off()
null device 
          1 
> plot(bundle_rot[,2],xaxt="n",xlab="PDB ID.",ylab=expression(Omega[w]),ylim=c(40,260),col="red",cex=1.5,)
> psplotfilename="Metric_bundle_rotation_translation.eps"
> postscript(psplotfilename, height=4, width=3.5,pointsize=10, horizontal=FALSE,
+ onefile=FALSE, paper='special')
> plot(bundle_rot[,2],xaxt="n",xlab="PDB ID.",ylab=expression(Omega[w]),ylim=c(40,260),col="red",cex=1.5,)
> axis(1,labels=c("1N55","1KKO","1E15","3CH0","3CWN"),at=c(1:5))
> points(bundle_rot[,1],cex=1.5)
> points(bundle_trans[,1],cex=1.5,pch=19)
> points(bundle_trans[,2],cex=1.5,pch=19,col="red")
> legend("topright",pch=c(1,19,1,19),col=c("black","black","red","red"),c(expression(paste(alpha,"-bundle rotation")),expression(paste(alpha,"-bundle translation")), expression(paste(beta,"-barrel rotation")),expression(paste(beta,"-barrel translation"))))
> dev.off()
null device 
          1 
>