write.csv(hhtpostEEMDexp1T5Pseudomask$amplitude[,],"hhtpostEEMDexp1T5Pseudomaskamplitude.csv")


write.csv(hhtpostEEMDexp2T5Pseudomask$amplitude[,],"hhtpostEEMDexp2T5Pseudomaskamplitude.csv")



write.csv(hhtpostEEMDexp1T5Pseudomask$instantfreq[,],"hhtpostEEMDexp1T5Pseudomaskinstantfreq.csv")

write.csv(hhtpostEEMDexp2T5Pseudomask$instantfreq[,],"hhtpostEEMDexp2T5Pseudomaskinstantfreq.csv")


write.csv(hhtpostEEMDexp1T5Pseudomask$energy,"hhtpostEEMDexp1T5Pseudomaskenergy.csv")


write.csv(hhtpostEEMDexp2T5Pseudomask$energy,"hhtpostEEMDexp2T5Pseudomaskenergy.csv")