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(41.81,46.12,40.25,50.90,50.37,47.32,43.12,47.05,40.46,49.55,42.89,48.33,54.29,44.49,56.13,51.64,51.76,46.55,42.92,54.79,45.58,47.51,47.37,50.83,48.27,48.41,47.02,53.83,52.23,52.95,64.02,56.88,52.36,48.50,53.97,53.29,60.45,54.06,47.76,56.66,47.44,48.88,48.35,44.46,49.21,49.63,52.12,49.12,44.39,56.88,48.89,46.89,54.04,55.97,40.31,50.42,50.51,52.67,52.33,51.28,44.52,55.89,55.59,54.55,54.27,48.80,49.18,52.39,40.75,56.80,45.36,46.69,43.54,44.01,48.82,50.51,54.05,56.01,57.47,61.45),dim=c(2,40),dimnames=list(c('Standard','New-Method'),1:40))
>  y <- array(NA,dim=c(2,40),dimnames=list(c('Standard','New-Method'),1:40))
>  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 = '.95'
> par6 = '0.0'
> par5 = 'unpaired'
> par4 = 'T-Test'
> par3 = '2'
> par2 = '1'
> par1 = 'two.sided'
> ylab = 'Y-Axis Title'
> xlab = 'X-Axis Title'
> main = 'Boxplots Title'
> #'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#
> par7 <- as#numeric#par7#
> par8 <- as#logical#par8#
> 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