您可以使用tidyr 包中的separate 函数。
df <- data.frame(Card_ID.Campaign_Responce = c("100751677 F", "103865437 F", "104811325 F",
"101232348 F", "103332398 F", "105464138 F",
"100054168 F", "100116075 F", "103039321 F",
"101186950 T", "100284919 T", "105043270 F",
"103627192 F", "100624075 F", "100141427 T",
"105294724 F", "100591001 F", "100764619 T",
"106418294 T", "101497198 T"))
head(df)
> head(df)
Card_ID.Campaign_Responce
1 100751677 F
2 103865437 F
3 104811325 F
4 101232348 F
5 103332398 F
6 105464138 F
df <- tidyr::separate(df, 1, c("Card_ID", "Campaign_Response"), " ")
head(df)
> head(df)
Card_ID Campaign_Response
1 100751677 F
2 103865437 F
3 104811325 F
4 101232348 F
5 103332398 F
6 105464138 F
https://tidyr.tidyverse.org/reference/separate.html