apply with sf code example

Example: apply with sf

# use st_drop_geometry

lapply(st_drop_geometry(df[,c(5:17)]), function(x) round(x,1))