I am trying to get values from variable `wtype1` using `paste0` but I am getting only the name of variable instead of values.

```
> a <- data.frame(wtype1=c(1:4))

> paste0("a$wtype",1)
> "a$wtype1"

```

I also tried using the `get` function with `paste0`

```
> get(paste0("a$wtype",1))
Error in get(paste0("a$wtype",1)) : object 'a$wtype1' not found

```

**Edited Question**

I have a data frame with 1000 row and 10 columns. I have to calculate zscores for wtype1 wtype2 wtype3 wtype4 wtype5 and case1 case2 case3 case4 case5 separately for each row. here is a dummy example of my data frame 

```
> data     
gene  wtype1  wtype2  wtype3  wtype4  wtype5  case1  case2 case3 case4 case5
A1CF    56       40     50     45      30      2       10    22     23    16 
........

```

The resulted data frame would look like (these values are just assumed)

```
> zscores.data
 gene  wtype1  wtype2  wtype3  wtype4  wtype5  case1  case2  case3  case4  case5
 A1CF    2.1     1.1     1.7     1.4    0.6   -0.04  -0.08   -0.2    0.25 -0.09
 ........

```