Qplot Glidande Medelvärde

Inte säker på om det här är en programmeringsfråga eller inte. Om jag har uppgifterna nedan, vilket ger ett spikigt diagram, och jag skulle vilja producera en något slätad en med ggplot2, hur går det mest elegant ut? De vanliga utjämningsmetoderna tar också bort Mycket information Ett sätt jag tänker på är att interpolera en extra två datapunkter mellan den aktuella uppsättningen och sedan ta ett 2-års glidande medelvärde eller något som verkar som mycket hårt arbete att koda manuellt så jag tar ett svar som automatiserar det elegant som en sista utväg. Som du kan se är det spikigt och visuellt obehagligt. Och detta tar bort för mycket information från grafen. Du kan försöka polynom Eftersom x-axelvariabeln har 12 unika värden kan du använda polynomier upp till 11: e graden Vidare bör du använda en kontinuerlig skala för x-axeln för att uppnå en jämn kurva. Här är ett exempel på en 8: e ordningens polynom. Här betyder metod lm att en linjär modell används. Funktionen specificerar graden. Jag har en tidsserie i ggplot2-paketet och jag har utfört det rörliga genomsnittet och jag skulle vilja lägga till resultatet av glidande medelvärde i tidsserien. Exempel på dataset p31.ambtemp dt -1 14 2007-09 -29 00 01 57 -1 12 2007-09-29 00 03 57 -1 33 2007-09-29 00 05 57 -1 44 2007-09-29 00 07 57 -1 54 2007-09-29 00 09 57 - 1 29 2007-09-29 00 11 57.Applicerad kod för tidsseriepresentation. Sammanställning av tidsseriepresentation. Sammanställning av rörlig genomsnittsprotokoll Prov av förväntade resultat. Utmaningen är att tidsseriedata uppges från dataset som inkluderar tidsstämplar och temperatur men Flytta genomsnittliga data inkluderar bara genomsnittskolumnen och inte tidstämplarna och montering av dessa två kan orsaka inkonsekvens. Koppla observationer, beställda av x value. mapping Den estetiska kartläggningen, vanligtvis konstruerad med aes eller aesstring Endast behöver ställas in på skiktet nivå om du överväger data för plotinställningar Ett lagsspecifikt dataset - behövs bara om du vill åsidosätta plot defaul ts stat Den statistiska omvandlingen som ska användas på data för denna lagerposition Positionpositionen som ska användas för överlappningspunkter på det här laget Andra argument som skickas vidare till lagret Det kan innehålla estetik vars värden du vill ställa in, inte karta Se lager för mer information. Anslut observationer, beställda av x value. geomline förstår följande estetik krävs estetik är i fetstil.