R version 2.6.0 (2007-10-03)
Copyright (C) 2007 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.20
+ ,4.8
+ ,0
+ ,-0.01
+ ,-15.30
+ ,6.1
+ ,0
+ ,0
+ ,-14.50
+ ,1.7
+ ,0
+ ,-0.01
+ ,1.40
+ ,5.1
+ ,0
+ ,0
+ ,5.00
+ ,-3.1
+ ,0
+ ,0.32
+ ,-1.20
+ ,8.1
+ ,0
+ ,-0.04
+ ,1.30
+ ,6.4
+ ,0
+ ,-0.15
+ ,-9.40
+ ,3.4
+ ,0
+ ,-0.1
+ ,8.10
+ ,4.2
+ ,0
+ ,-0.05
+ ,7.30
+ ,0.8
+ ,0
+ ,-0.02
+ ,-2.30
+ ,1.7
+ ,0
+ ,0
+ ,-1.40
+ ,4.6
+ ,0
+ ,-0.01
+ ,-4.40
+ ,0.6
+ ,0
+ ,0.01
+ ,13.90
+ ,0.2
+ ,0
+ ,-0.01
+ ,11.70
+ ,14.2
+ ,0
+ ,0
+ ,5.40
+ ,2.6
+ ,0
+ ,0.02
+ ,-6.30
+ ,6.5
+ ,0
+ ,0.42
+ ,2.30
+ ,10.3
+ ,0
+ ,0.03
+ ,3.90
+ ,-0.4
+ ,0
+ ,-0.1
+ ,4.00
+ ,5.8
+ ,0
+ ,-0.07
+ ,5.30
+ ,9.2
+ ,0
+ ,-0.04
+ ,-10.10
+ ,-4.4
+ ,0
+ ,-0.01
+ ,-10.90
+ ,10.2
+ ,0
+ ,-0.01
+ ,4.20
+ ,12.6
+ ,0
+ ,-0.02
+ ,2.30
+ ,5.2
+ ,0.09
+ ,0.01
+ ,9.40
+ ,1.1
+ ,0.01
+ ,-0.01
+ ,-1.80
+ ,-0.3
+ ,0
+ ,0.02
+ ,-14.60
+ ,4.3
+ ,0
+ ,0.02
+ ,15.80
+ ,6.1
+ ,0
+ ,0.32
+ ,0.80
+ ,3.4
+ ,0.01
+ ,-0.06
+ ,4.80
+ ,-6.3
+ ,0.01
+ ,-0.13
+ ,0.40
+ ,5.5
+ ,0
+ ,-0.14
+ ,-20.10
+ ,1.9
+ ,0.01
+ ,-0.1
+ ,1.60
+ ,0.7
+ ,0
+ ,-0.03
+ ,13.00
+ ,6.3
+ ,0
+ ,-0.02
+ ,5.70
+ ,0.4
+ ,0.01
+ ,0
+ ,-6.90
+ ,6.2
+ ,0.01
+ ,0
+ ,-14.00
+ ,4.5
+ ,0
+ ,0
+ ,20.10
+ ,9.6
+ ,0.01
+ ,0
+ ,12.60
+ ,-0.2
+ ,0
+ ,0.01
+ ,-16.50
+ ,10.8
+ ,0
+ ,0.14
+ ,6.90
+ ,0.1
+ ,0
+ ,0.07
+ ,-13.90
+ ,6.0
+ ,0
+ ,-0.02
+ ,-22.60
+ ,5.7
+ ,0.01
+ ,-0.04
+ ,0.80
+ ,0.0
+ ,0
+ ,-0.02
+ ,9.00
+ ,14.1
+ ,0
+ ,0.01
+ ,3.00
+ ,5.8
+ ,0
+ ,0
+ ,-33.10
+ ,-2.3
+ ,0
+ ,1.01
+ ,13.90
+ ,4.6
+ ,0.01
+ ,-0.02
+ ,5.70
+ ,7.6
+ ,0
+ ,0.03
+ ,-6.30
+ ,5.7
+ ,0.01
+ ,0.02
+ ,-4.80
+ ,9.4
+ ,0.01
+ ,-0.02
+ ,10.90
+ ,1.9
+ ,0
+ ,0.01
+ ,-19.00
+ ,4.9
+ ,0
+ ,0.01
+ ,11.4
+ ,0
+ ,0
+ ,0.01
+ ,0.01
+ ,0.01
+ ,-0.01
+ ,0
+ ,0.01
+ ,0.01
+ ,0
+ ,0.01
+ ,0
+ ,0.01
+ ,-0.01
+ ,0.01
+ ,-0.01
+ ,0
+ ,0
+ ,0.01
+ ,0
+ ,0
+ ,0
+ ,0
+ ,0.01)
+ ,dim=c(4
+ ,66)
+ ,dimnames=list(c('P'
+ ,'gs'
+ ,''
+ ,'ind'
+ ,'prod'
+ ,'brood'
+ ,''
+ ,'aardappelen')
+ ,1:66))
Error in dimnames(data) <- dimnames : 
  length of 'dimnames' [1] not equal to array extent
Calls: array
Execution halted