+-----+------+
|EmpId|Salary|
+-----+------+
|111 |50000 |
|222 |60000 |
|333 |40000
+-----+------+
library(sparklyr)
sc <- spark_connect(master = "local")
df <- sdf_len(sc, 100)
df <- sdf_repartition(df, 5) %>%
spark_apply(function(df){
df['new']<-df$id * 10
df
})