Estoy bastante frustrado porque no sé cómo logro nombrar las columnas y filas en una lista de cuadros de datos. Quiero decir que quiero evitar usar un bucle. Así que pensé que podría usar solo lapply. Ok al principio tengo la siguiente lista:

>a
    $nem.greedyMAP.FALSE.POS
   X1 X2 X3 X4 X5 X6 X7 X8 X9 X10
1  NA NA NA NA NA NA NA NA NA  NA
2  NA NA NA NA NA NA NA NA NA  NA
3  NA NA NA NA NA NA NA NA NA  NA
4  NA NA NA NA NA NA NA NA NA  NA
5  NA NA NA NA NA NA NA NA NA  NA
6  NA NA NA NA NA NA NA NA NA  NA
7  NA NA NA NA NA NA NA NA NA  NA
8  NA NA NA NA NA NA NA NA NA  NA
9  NA NA NA NA NA NA NA NA NA  NA
10 NA NA NA NA NA NA NA NA NA  NA

$nem.greedyMAP.FALSE.NEG
   X1 X2 X3 X4 X5 X6 X7 X8 X9 X10
1  NA NA NA NA NA NA NA NA NA  NA
2  NA NA NA NA NA NA NA NA NA  NA
3  NA NA NA NA NA NA NA NA NA  NA
4  NA NA NA NA NA NA NA NA NA  NA
5  NA NA NA NA NA NA NA NA NA  NA
6  NA NA NA NA NA NA NA NA NA  NA
7  NA NA NA NA NA NA NA NA NA  NA
8  NA NA NA NA NA NA NA NA NA  NA
9  NA NA NA NA NA NA NA NA NA  NA
10 NA NA NA NA NA NA NA NA NA  NA

Por supuesto, esta lista es mucho más grande, de lo contrario no valdría la pena. Sin embargo, quiero cambiar el nombre de las columnas y filas de todos los cuadros de datos de la misma manera. Entonces pensé que podía usar:

lapply(a, function(x) {colnames(x) <- paste("col",1:10,sep="")})

Pero nada pasa. ¿Cómo podría lograr esto? ¿O es lapply el camino equivocado?

Gracias