String 如何分割数据帧并提取特定模式？

我已经提取了数据帧的第一行

> top_row 
Date EUR/USD Close USD/JPY Close USD/CHF Close GBP/USD Close EUR/GBP Close EUR/JPY Close EUR/CHF Close GBP/JPY Close GBP/CHF Close

第一列是“日期”，第二列是“欧元/美元收盘价”，依此类推。。。 现在，我想提取欧元、日元、美元、英镑和瑞士法郎，即不同的货币。我尝试使用

strsplit（）

，但由于它是dataframe，所以不起作用

---

请进一步指导我。谢谢 我同意普拉萨德的评论。这似乎与data.frames无关。似乎您只想从字符向量中提取内容：

curr_pairs <- gsub(" Close","",top_row[-1])
unique_curr <- unique(unlist(strsplit(curr_pairs,"\\/")))
# [1] "EUR" "USD" "JPY" "CHF" "GBP"

---

curr\u对，那么您只需要解析数据帧的标题（第一行）并提取单一货币字符串“EUR”、“USD”等？换句话说，这与数据帧无关，对吗？