I currently have created a number of subsets of data that I have named A.sub, B.sub, C.sub, etc. I would like to use a loop to try and add a column to each of these subsets based on column name in a data.frame. For a frame with column names A, B, C, I would like to be able to call [column name].sub (e.g. A.sub, B.sub, C.sub). The name of the data.frame that I am trying to draw the column names from is called SellList. My current attempt looks like this (data simplified to show a clearer example of what I'm trying to do):

```
> SellList
                A     B     C
Sale Amount 30000 20000 10000

> A.sub
            Price   Holdings  $ Amt Owned
            101.4        400        40560

> B.sub
            Price   Holdings  $ Amt Owned
             95.5        300        28650

> C.sub
            Price   Holdings  $ Amt Owned
            154.1        100        15450

for(i in 1:width(SellList)){
  colnames(SellList[i]).sub$SaleAmount <- SellList[1,i]
}

```

With the end goal of having the subs look like:

```
> A.sub
            Price   Holdings  $AmtOwned  SaleAmount
            101.4        400      40560       30000

> B.sub
            Price   Holdings  $AmtOwned  SaleAmount
             95.5        300      28650       20000

> C.sub
            Price   Holdings  $AmtOwned  SaleAmount
            154.1        100      15450       10000

```

An alternate method that I've tried that doesn't seem to be working either is putting all of the subsets in a list and then running through the list like so:

```
for(i in length(list.level)){
  list.level[i].sub$SaleAmount <- SellList[1,i]
}

```