在R語言中，可以使用gzip和gzfile函數來進行數據壓縮和解壓縮操作。下面是一個簡單的示例代碼：
# 壓縮數據
data <- c(1, 2, 3, 4, 5)
write.table(data, "data.txt", sep = "\t") # 將數據寫入文件
# 壓縮文件
gzfile <- gzfile("data.txt.gz", "wb") # 創建一個gz文件
writeLines(readLines("data.txt"), con = gzfile) # 將數據寫入gz文件
close(gzfile) # 關閉gz文件
# 解壓縮文件
gzfile <- gzfile("data.txt.gz", "rb") # 打開gz文件
data <- readLines(gzfile) # 讀取數據
close(gzfile) # 關閉gz文件
# 輸出解壓縮后的數據
print(data)
在以上示例中，我們首先將數據寫入一個文本文件data.txt，然后將該文件壓縮為data.txt.gz文件，并最終通過解壓縮操作將數據讀取出來并輸出。
