new_column

cube <- function(x){
    x * x * x
}
df <- data.frame(x = c(1,2,3,4,5), y = c(2,4,6,8,10))
df$z <- sapply(df$x, cube)
print(df)