[Solved] Add Variance Column in R data frame [closed]

df is the given data frame

Desired output will come from this line

     cbind(df, var = apply(df[,4:16], 1, function(x) var(na.omit(x))))