R version 2.9.0 (2009-04-17)
Copyright (C) 2009 The R Foundation for Statistical Computing
ISBN 3-900051-07-0

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.

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.

> x <- array(list(4,8,7,5,7,5,5,7,11,1,11,1,12,0,10,2,12,0,10,2,11,1,10,2,11,1,9,3,12,0,9,3,12,0,7,5,11,1,9,3,12,0,6,6,12,0,10,2,12,0,7,5,5,7,4,8,12,0,10,2,12,0,11,1,9,3,10,2,12,0,10,2,10,2,7,5,10,2,9,3,12,0,7,5,12,0,11,1,11,1,7,5,12,0,9,3,10,2,9,3,12,0,8,4,9,3,8,4,12,0,10,2,12,0,9,3,10,2,11,1,11,1,9,3,12,0,8,4,12,0,8,4,12,0,7,5,12,0,10,2,11,1,10,2,8,4,8,4,11,1,8,4,11,1,11,1,11,1,9,3,12,0,9,3,12,0,7,5,12,0,11,1,7,5,8,4,11,1,8,4,12,0,9,3,10,2,4,8,11,1,11,1,11,1,8,4,11,1,8,4,10,2,7,5,12,0,9,3,12,0,8,4,12,0,9,3,10,2,6,6,12,0,11,1,9,3,8,4,10,2,9,3,11,1,11,1,11,1,4,8,10,2,8,4,11,1,11,1,9,3,10,2,12,0,8,4,10,2,1,11,11,1,10,2,10,2,6,6,12,0,10,2,10,2,7,5,11,1,7,5,12,0,7,5,9,3,11,1,10,2,10,2,10,2,6,6,10,2,6,6,8,4,7,5,6,6,2,10,12,0,11,1,10,2,9,3,10,2,12,0,12,0,11,1,11,1,11,1,11,1,7,5,10,2,7,5,11,1,12,0,12,0,9,3),dim=c(4,86),dimnames=list(c('P1Cat','P1Noncat','P2Cat','P2Noncat'),1:86))
>  y <- array(NA,dim=c(4,86),dimnames=list(c('P1Cat','P1Noncat','P2Cat','P2Noncat'),1:86))
>  for (i in 1:dim(x)[1])
+  {
+  	for (j in 1:dim(x)[2])
+  	{
+  		y[i,j] <- as.numeric(x[i,j])
+  	}
+  }
> par8 = 'TRUE'
> par7 = ''
> par6 = '0.0'
> par5 = 'paired'
> par4 = 'Students T-Test'
> par3 = '2'
> par2 = '1'
> par1 = 'two.sided'
> ylab = 'No. of Responses'
> xlab = 'Variable'
> main = 'Boxplot One'
> #'GNU S' R Code compiled by R2WASP v. 1.0.44 ##
> #Author: Dr. Ian E. Holliday
> #To cite this work: Ian E. Holliday, 2009, Aston University Statistical Software #vNUMBER# in Free Statistics Software #v$_version#, Office for Research Development and Education, URL http://www.wessa.net/rwasp_AUSS.wasp/
> #Source of accompanying publication: 
> #Technical description: 
> par2 <- as.numeric#par2#
> par3 <- as.numeric#par3#
> par4 <- as.character#par4#
> par5 <- as.character#par5#
> par6 <- as.numeric#par6#
> if # par5 ## 'unpaired'# paired <- FALSE else paired <- TRUE
+ x <- t#y#
Error: unexpected symbol in:
"if # par5 ## 'unpaired'# paired <- FALSE else paired <- TRUE
x"
Execution halted