在 R 中将 tbl_df 结果转换和导出到 xlsx 时出错

我做了一些变量的相关性，但是在导出结果时我得到了一个错误，因为函数没有导出相关性结果，而是返回原始的 data.frame。

    library(ggplot2)
    library(dplyr)
    library(corrplot)
    library(writexl)
    
    veg<-c(1,2,3,2.3,4.1)
    wet<-c(2,2.3,1.9,2.5,2.2)
    dry<-c(5,5.1,6.9,4.3,5.3)
    water<-c(0.69,0.75,0.81,0.82,0.82)
    coli<-c(10,11,12,13,9.7)
    OD<-c(1,3,2.5,2.7,1.8)
    DBO<-c(7,8,9,6.5,8)
    DQO<-c(3.5,4,4.1,3,2)
     
    data_land<-data.frame(veg, wet, dry, water, OD, DBO, DQO)
    
    library(corrr)

    data_land%>%
correlate(method = "spearman")%>%
focus(veg:water)
    
    write_xlsx(data_land, "D:/01-Mestrado/0Dissertacacao/1Rstudio/felipe2/112.xlsx")

但是当我打开结果时，我看到它是相同的data_land值而不是相关性