I have created a list that contains 64 dataframes. As you can see in the code below they contain the results of a sum (PST[rownames(pct_kritiek),]*pct_kritiek[,i] *1000000).