I\'m using a daily dataset from mid to end of year 2015.
ts <- ts(df$sales, start = c(2015,6), frequency = 365) decompose(ts)
It returns