r split string column by delimiter

# Assuming 'data' is your data frame and 'column_name' is the name of the column you want to split
data$new_columns <- strsplit(data$column_name, ",")
data <- data.frame(data, do.call('rbind', strsplit(as.character(data$column_name), ',')))
colnames(data)[(ncol(data)-ncol(data)+1):(ncol(data))] <- paste0('new_column_', 1:ncol(data))