Oh yeah okay thanks seen the issue..but new problem...
Depth <- dwt(up.sample(Data[, c("DEPTH (m)")], f - 1), wf="la8", n.levels=4, boundary="periodic")
Error in matrix(rep(y, (f - 1) * n), nrow = f - 1) : object 'f' not found
What does f mean in upsampling