data(abalone)
split_list <- train_test_split(abalone, test_size = 0.3)
X_train <- split_list[[1]]
X_test <- split_list[[2]]
y_train <- split_list[[3]]
y_test <- split_list[[4]]
print(head(X_train))
print(head(X_test))
print(head(y_train))
print(head(y_test))
Run the code above in your browser using DataLab