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(Pgrade,80,66,67,65,67,72,80,65,64,60,61,64,61,64,57,67,64,64,66,53,59,55,57,72,62,71,57,62,63,64,65,69,62,62,52,54,68,48,60,50,58,55,54,60,55,74,80,74,65,65,62,60,62,67,60,64,65,62,63,62,68,67,62,67,58,68,58,60,60,55,47,58,54,52,55,51,58,74,74,80,74,68,74,74,65,65,74,74,74,74,65,62,74,58,65,65,65,62,74,65,68,65,62,62,68,68,62,58,62,68,63,58,65,58,62,65,65,65,52,65,62,65,62,45,65,58,62,65,58,58,74,62,65,62,58,55,65,55,68,80,74,62,74,68,65,65,68,62,62,68,65,58,58,65,65,58,62,52,68,62,68,58,58,52,58,62,65,58,55,65,58,58,58,65,62,65,58,58,55,68,55,65,62,80,68,65,58,68,68,68,62,62,68,65,58,65,80,65,62,65,74,58,62,68,58,65,62,62,62,58,65,52,58,58,52,65,65,58,65,40,62,74,58,58,55),dim=c(1,226),dimnames=list(c('pment','nopment'),1:226))
Error in as.vector(data) : object 'Pgrade' not found
Calls: array -> as.vector
Execution halted