如果有三個數據集，想要找出它們之間的共同變量名和不同變量名，你可以使用以下的R代碼：
```R
# 創建三個示例數據集
data1 <- data.frame(ID = 1:5, Name = c("Alice", "Bob", "Charlie", "David", "Eva"))
data2 <- data.frame(ID = 6:10, FirstName = c("Frank", "Grace", "Hannah", "Ivy", "Jack"))
data3 <- data.frame(ID = 11:15, LastName = c("King", "Lee", "Martin", "Nixon", "Oliver"))
# 獲取數據集的列名
colnames_data1 <- colnames(data1)
colnames_data2 <- colnames(data2)
colnames_data3 <- colnames(data3)
# 查找共同和不同的列名
common_names <- Reduce(intersect, list(colnames_data1, colnames_data2, colnames_data3))
different_names_data1 <- setdiff(colnames_data1, common_names)
different_names_data2 <- setdiff(colnames_data2, common_names)
different_names_data3 <- setdiff(colnames_data3, common_names)
# 輸出結果
cat("共同的列名：", common_names, "\n")
cat("在數據集1中獨有的列名：", different_names_data1, "\n")
cat("在數據集2中獨有的列名：", different_names_data2, "\n")
cat("在數據集3中獨有的列名：", different_names_data3, "\n")
```
在這個示例中，我們創建了三個示例數據集`data1`、`data2`和`data3`，然后獲取它們的列名。接著，我們使用`Reduce()`函數和`intersect()`函數來找出這三個數據集之間的共同列名，并使用`setdiff()`函數來找出每個數據集中獨有的列名。最后，我們將結果輸出，包括共同列名和每個數據集中獨有的列名。
