如何在r中将一个SQL列拆分为多个列

# 导入必要的包
library(tidyr)

# 创建一个包含SQL列的数据框
sql_column <- c("SELECT * FROM table", "INSERT INTO table VALUES (1, 'John')", "UPDATE table SET name = 'Alice' WHERE id = 1")
data <- data.frame(sql_column)

# 使用字符串处理函数和正则表达式拆分SQL列
data <- separate(data, sql_column, into = c("command", "table", "values"), sep = "(?i)\\b(SELECT|FROM|INSERT INTO|VALUES|UPDATE|SET|WHERE)\\b")

# 输出拆分后的数据框
print(data)