I am working in Deseq2 package in R and trying to export data using write.csv( dataframe, file=“ file.csv”) but was unable to get the data in the file

Question

resSig <- subset(res, res$padj < 0.05 )  

Using this code i create a vector resSig

head( resSig[ order( resSig$log2FoldChange ), ],