R version 2.13.0 (2011-04-13)
Copyright (C) 2011 The R Foundation for Statistical Computing
ISBN 3-900051-07-0
Platform: i486-pc-linux-gnu (32-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.

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(7,1,4,5,5,3,5,4,5,4,4,5,5,5,5,6,5,5,5,5,7,7,7,7,7,1,4,7,5,5,6,6,3,2,4,7,6,3,3,6,7,6,5,7,6,4,2,5,5,3,3,3,3,3,3,2,7,6,7,7,5,5,5,5,7,5,5,5,7,5,4,6,7,1,6,7,6,5,6,6,5,3,4,5,7,4,6,7,4,2,3,5,7,3,2,5,7,5,5,6,7,5,5,7,7,5,5,7,3,2,1,2,7,4,5,6,5,6,6,6,7,6,5,7,5,4,6,6,5,6,7,6,4,3,),dim=c(4,34),dimnames=list(c('Q7','Q14','Q21','Q28'),1:34))
Error in list(7, 1, 4, 5, 5, 3, 5, 4, 5, 4, 4, 5, 5, 5, 5, 6, 5, 5, 5,  : 
  argument 135 is empty
Calls: array -> as.vector
Execution halted