Weekly stochastic on daily chart

[Johnny Cash]

Does anyone know how to smooth out these stochastic lines.
Weekly stochastic on daily chart.
Really appreciate if someone could offer some help.
Thanks in advance

declare lower;

input over_bought = 80;
input over_sold = 32;
input aggregationPeriod = AggregationPeriod.WEEK;
input KPeriod = 10;
input DPeriod = 3;
input slowing_period = 3;

plot FullK = Average((close(period = aggregationPeriod) - Lowest(low(period = aggregationPeriod), KPeriod)) / (Highest(high(period = aggregationPeriod), KPeriod) - Lowest(low(period = aggregationPeriod), KPeriod)) * 100, slowing_period);
plot FullD = Average(Average((close(period = aggregationPeriod) - Lowest(low(period = aggregationPeriod), KPeriod)) / (Highest(high(period = aggregationPeriod), KPeriod) - Lowest(low(period = aggregationPeriod), KPeriod)) * 100, slowing_period), DPeriod);

plot OverBought = over_bought;
plot OverSold = over_sold;

https://imgur.com/sewwUJi

https://imgur.com/epb1lWn

 

[inthefutures]

This is how I would do it to see if it works, and that is aggregate daily but do it 5 times and collect and plot them [1] [2], and so on. not sure what happens on weekends. I hope there is a better solution but this what popped in my head