R help - Feb 2015 - expressions from dataframe columns

Hi List,

I am trying to assign a large expression. It has about 140 lines of code, so
of course this is cumbersome:

list('10001'=list(panel=c(PanelOne=944), seltype='Equal'),
'10002'=list(panel=c(PanelOne=454), seltype='Equal'),
'10003'=list(panel=c(PanelOne=1210), seltype='Equal'),
'10004'=list(panel=c(PanelOne=1), seltype='Equal'),
......
''640'=list(panel=c(PanelOne=1), seltype='Equal'))->test

The numbers in the expression come from within a dataframe:
layer          re1
10001       944
10002       454
10003       1210
10004       1
...
640           1

so in theory one should be able to construct this within R with something
like paste and cat. However, all my attempts have swarted me. 

Any  suggestions?

Thanks
Herry