powered by
smoothProfiles(profiles, x = 1:nrow(profiles), svm.c = NULL, svm.eps = NULL, svm.gamma = NULL, parsvm.unique = TRUE)
wby.smooth <- smoothProfiles(profiles = ss.data.wby, x = ss.data.wbx) plotProfiles(profiles = wby.smooth, x = ss.data.wbx)
Run the code above in your browser using DataLab