Glidande Medelvärde Code In R

Rörande medelvärden i R Såvitt jag vet, har R inte en inbyggd funktion för att beräkna glidande medelvärden. Med hjälp av filterfunktionen kan vi dock skriva en kort funktion för glidmedel: Vi kan sedan använda funktionen på alla data: mav (data) eller mav (data, 11) om vi vill ange ett annat antal datapunkter Än standard 5-plottningen fungerar som förväntat: plot (mav (data)). Förutom antalet datapunkter över vilka i genomsnitt kan vi också ändra sidoperspektivet för filterfunktionerna: sides2 använder båda sidor, sides1 använder endast tidigare värden. Dela det här: Postnavigering Kommentarnavigering Kommentar navigeringMovande medelvärde kunde inte läsa de data du skickade försöket dput nästa gång. Om det bara är ett 2-dagars glidande medelvärde, försök filtreringsfunktionen: gt x lt - 1:20 gt x 1 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 gtfilter (x, C (.5, .5)) Tidsserie: Start 1 Slut 20 Frekvens 1 1 1,5 2,5 3,5 4,5 5,5 6,5 7,5 8,5 9,5 10,5 11,5 12,5 13,5 14,5 15,5 16,5 17,5 18,5 19,5 NA gt Jim Holtman Data Munger Guru Vad är problemet med att du försöker lösa Berätta för mig vad du vill göra, inte hur du vill göra det. På Sun, 28 december 2014 kl 6:56 skrev Rolf Edberg lthidden email gt: alternativ HTML-version borttagen dold email-postlista - För att UNSUBSCRIBE och mer, se stat. ethz. chmailmanlistinfor-help Läs läsningsguiden R - project. orgposting-guide. html och ge kommentar, minimal, fristående, reproducerbar kod. gt x lt - read. csv (text quotDate, Öppna, Hög, Låg, Stäng, Volym, Adj Stäng 2014-12-26,162.27,163.09,162.01,162,34,1912200,162,34 2014-12-24,162,88,162,99,161,61,161.82, 1868100,161.82 2014-12-23,162.23,162,90,161,61,162.24,4043300,162.24 2014-12-22,158.33,161.91,158.33,161.44,4682500,161.44quot, as. is TRUE) gt kräver (lubridat) gt xDate lt-ymd (XDate) konvertera till ett datumfält gt x lt-xorder (xDate), sortera efter datum gt xtwoday lt-filter (xClose, c (0,5, 0,5)) beräkna glidande medelvärde gt x Datum Öppet Högt Lågt Stängt Volym Adj. Close Twoday 4 2014-12-22 158.33 161.91 158.33 161.44 4682500 161.44 161.84 3 2014-12-23 162.23 162.90 161.61 162.24 4043300 162.24 162.03 2 2014-12-24 162.88 162.99 161.61 161.82 1868100 161.82 162.08 1 2014-12-26 162.27 163.09 162.01 162.34 1912200 162.34 NA Jim Holtman Data Munger Guru Vad är problemet du försöker lösa Berätta för mig vad du vill göra, inte hur du vill göra det. På Sun, Dec 28, 2014 at 8:31, skrev Rolf Edberg lthidden email gt: gt Tack för att du försökte hjälpa. Gt gt gt gt Jag är väldigt ny på R-koden. Så behöver hjälp med varje steg. Gt gt gt Målet är att använda teknisk analys på aktiekurserna. Inte bara MA men om jag förstår principen med det hoppas jag att jag kan använda de andra teknikerna också. gt gt gt gt hittade r-adamant men vet inte hur man använder den gt gt gt gt nedladdade 4 dagar av IBM-priser från yahoo i en csv-fil. gt gt vet inte vad dput är Gt gt gt Här är IBM-priserna i en textsträng: gt gt Datum, Öppet, Högt, Lågt, Stäng, Volym, Adj Stäng gt gt 2014-12-26,162.27,163.09,162.01,162.34,1912200,162.34 gt gt 2014 -12-24,162,88,162,99,161,61,161,82,1868100,161,82 gt gt 2014-12-23,162,23,162,90,161,61,162.24,4043300,162,24 gt gt 2014-12-22,158,33,161,91,158,33,161,44,4682500,161,44 gt Gt gt jag skulle vilja att datumet i sorterat med den äldsta på toppen. Gt gt gt gt skulle jag vilja lägga till en kolumn med den tekniska indikatorn, i det här fallet gt 2-dagar MA av stänga. Gt gt gt gt och jag skulle vilja få resultatet i en csv-fil. Jag kommer att använda filen i gt ett annat program. gt gt gt tack Gt gt gt gt gt gt gt gt gt Från: jim holtman mailto: dold email gt Skickat: söndag den 28 december 2014 kl 16:45 gt Till: Rolf Edberg gt Cc: R-postlista gt Ämne: Re: R Flytta genomsnittet gt Gt gt gt kunde inte läsa de data du skickade försöka dput nästa gång. Gt gt gt gt Om det bara är ett 2-dagars glidande medelvärde, försök filterfunktionen: gt gt gt gt gt gt gt gt gt 1 gt 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 gt gt gt filter (x, c (.5, .5)) gt Tidsserie: gt gt Start 1 gt gt Slut 20 gt gt Frekvens 1 gt gt 1 1,5 2,5 3,5 4,5 5,5 6,5 7,5 8.5 9.5 10.5 11.5 12.5 13.5 14.5 gt 15.5 16.5 17.5 18.5 19.5 NA gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt Data Munger Guru gt gt Vad är problemet du försöker lösa gt Berätta för mig vad du vill göra, Inte hur du vill göra det. Gt gt gt gt På Sun, 28 december 2014 kl 6:56, skrev Rolf Edberg lthidden email gt: gt gt gt gt Hur lägger jag till en ny kolumn med 2-dagars glidande medelvärde (från gt r-adamant (githubTotallyBullshitradamant) ) På IBM-priser i en gt csv-fil (ibm. csv) och spara sedan allt i en ny csv-fil (ibm2.csv) gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt Low gt gt Close gt gt Volym gt gt Adj Close gt gt gt Dec 26, 2014 gt gt 162,27 gt gt 162,09 gt gt 162,01 gt gt 162,34 gt gt 1,912,200 gt 162,24 gt gt 24 dec 2014 gt gt 162,88 gt gt 162,99 gt Gt 161,61 gt gt 161,82 gt gt 1,868,100 gt 161,82 gt gt gt dec 23, 2014 gt gt 162,23 gt gt 162,90 gt gt 161,61 gt gt 162,24 gt gt 4,043,300 gt 162,24 gt gt dec 22, 2014 gt gt 158,33 gt gt 161,91 gt Gt 158,33 gt gt 161,44 gt gt 4,682,500 gt 161,44 gt gt 19 dec 2014 gt gt 157,49 gt gt 160,41 gt gt 157,49 gt gt 158,51 gt gt 8,864,900 gt 158,51 gt gt alternative gt version gt gt gt hidden email Postadress li St - För att UNSUBSCRIBE och mer, se gt stat. ethz. chmailmanlistinfor-help gt Läs läsningsguiden gt R-project. orgposting-guide. html gt och ge kommentar, minimal, fristående, reproducerbar kod. Gt gt gt alternativ HTML-version raderad dold email-postlista - För att UNSUBSCRIBE och mer, se stat. ethz. chmailmanlistinfor-help Läs läsningsguiden R-project. orgposting-guide. html och kommentera, minimera, fristående , reproducerbar kod. På tisdag 30 december 2014 skrev jim holtman: gt Prova detta: gt gtgt x lt - read. csv (text quotDate, Open, High, Low, Stäng, Volym, Adj Close gt 2014-12-26,162.27,163.09,162.01, 162,34,1912200,162,34 gt 2014-12-24,162,88,162,99,161,61,161,82,1868100,161,82 gt 2014-12-23,162,23,162,90,161,61,162,24,4043300,162,24 gt 2014-12-22,158,33,161,91,158,33,161,44, 4682500,161.44quot, as. is TRUE) gtgt kräver (lubridate) gtgt xDate lt-ymd (xDate) konvertera till ett datumfält gtgt x lt-xorder (xDate), sortera efter datum gtgt xtwoday lt-filter (xClose, c 0,5, 0,5)) beräkna glidande medelvärde gtgt x gt Datum Öppet Högt Lågt Stäng Volym Adj. Close Twoday gt 4 2014-12-22 158.33 161.91 158.33 161.44 4682500 161.44 161.84 gt 3 2014-12-23 162.23 162.90 161.61 162.24 4043300 162.24 162.03 gt 2 2014-12-24 162,88 162,99 161,61 161,82 1868100 161,82 162,08 gt 1 2014-12-26 162,27 163,09 162,01 162,34 1912200 162,34 NA En doseringsmetod för läsning och filtrering av data finns också i kvotkupongpaketet. Funktionen read. zoo () kan direkt skapa ett quotzooquot-tidsserieobjekt med quotDatequot-tid index: Rgt z lt - read. zoo (text quotDate, Open, High, Låg, Stäng, Volym, Adj Stäng 2014-12-26,162.27,163.09 , 162,01,162,34,1912200,162,34 2014-12-24,162,88,162,99,161,61,161,82,1868100,161,82 2014-12-23,162,23,162,90,161,61,162,24,4043300,162,24 2014-12-22,158,33,161,91,158,33,161,44, 4682500,161.44quot, rubrik TRUE, sep quot, quot, format quotY-m-dquot) Och sedan kan rollmean () beräkna rullande medel för alla variabelkolumner: Rgt rollmean (z, 2) Öppna High Low Close Volume Adj. Close 2014- 12-22 160,280 162,405 159,97 161,84 4362900 161,84 2014-12-23 162,555 162,945 161,61 162,03 2955700 162,03 2014-12-24 162,575 163,040 161,81 162,08 1890150 162,08 Du kan dessutom leverera fylla NA-argumentet om du vill ha efterföljande NA för 2014-12-26 . Gt gt Jim Holtman gt Data Munger Guru gt gt Vad är problemet du försöker lösa gt Berätta vad du vill göra, inte hur du vill göra det. Gt gt den sun 28 dec 2014 kl 8:31, rolf edberg lthidden email gt skrev: gt gtgt Tack för att du försökte hjälpa. Gtgt gtgt gtgt gtgt Jag är väldigt ny på R-koden. Så behöver hjälp med varje steg. Gtgt gtgt gtgtgtgt Målet är att använda teknisk analys på aktiekurserna. Inte bara MA men om jag förstår principen med det hoppas jag att jag också kan använda de andra teknikerna. gtgt gtgt gtgt gtgt Jag hittade R-adamant men vet inte hur man använder den. gtgt gtgtgtgtgt Jag hämtade 4 dagar av IBM-priser från yahoo i en csv-fil. Gtgt gtgt Jag vet inte vad dput är. gtgt gtgt gtgt gtgt Här är IBM-priserna i en textsträng: gtgt gtgt Datum, Öppet, Högt, Lågt, Stäng, Volym, Adj Close gtgt gtgt 2014-12-26,162.27,163.09,162.01,162.34,1912200,162.34 gtgt gtgt 2014 -12-24,162,88,162,99,161,61,161,82,1868100,161,82 gtgt gtgt 2014-12-23,162.23,162,90,161,61,162.24,4043300,162.24 gtgt gtgt 2014-12-22,158.33,161.91,158.33,161.44,4682500,161.44,482500,161,44,4 Gtgt gtgt Jag skulle vilja att datumet sorteras med de äldsta på toppen. gtgt gtgt gtgt gtgt Jag skulle vilja lägga till en kolumn med den tekniska indikatorn, i det här fallet gtgt 2-dagar MA av Close. gtgt gtgt gtgt gtgt Och jag skulle vilja få resultatet i en csv-fil. Jag kommer att använda filen i gtgt ett annat program. Gtgt gt gt gtgt gtgt Tack. Gtgt gtgt gt gt gtgt gtgt gtgt gtgt gtgt gtgt Från: jim holtman mailto: dold email gtgt Skickat: söndag 28 december 2014 kl 16:45 gtgt Till: Rolf Edberg gtgt Cc: R-postlista gtgt Ämne: Re: R Flytta genomsnittet gtgt Gtgt gtgt gtgt kunde inte läsa de data du skickade försöka dput nästa gång. Gt gt gt gtgt gtgt gtgt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt 1 1 2 3 4 5 6 7 8 9 10 11 12 13 Om det bara är ett 2 dagars glidande medelvärde, försök filtreringsfunktionen: gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt 1 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 gtgt gtgt gt filter (x, c (.5, .5)) gtgt gtgt Tidsserie: gtgt gtgt Start 1 gtgt gtgt Slut 20 gtgt gtgt Frekvens 1 gtgt gtgt 1 1,5 2,5 3,5 4,5 5,5 6,5 7,5 8,5 9,5 10,5 11,5 12,5 13,5 14,5 gtgt 15,5 16,5 17,5 18,5 19,5 Något som du kan använda för att hitta gtgt gtgt gtgt gt gtgt gtgt gtgt gtgt gtgt Data Munger Guru gtgt gtgt Vad är problemet du försöker lösa gtgt Berätta vad du vill göra, Inte hur du vill göra det. Gtgt gtgt gtgt gtgt På Sun, 28 december 2014 kl 6:56, skrev Rolf Edberg lthidden email gt gtgt gtgt gt gtgt gtgt Hur lägger jag till en ny kolumn med 2-dagars glidande medelvärde (från gtgt r-adamant (githubTotallyBullshitradamant) ) På IBM-priser i en gtgt csv-fil (ibm. csv) och spara sedan allt i en ny csv-fil (ibm2.csv) gtgt gtgt gtgt gtgt gtgt gt gtgt gtgt gtgt gtgt gtgt gtgt Date gtgt gtgt Open gtgt gtgt High gtgt gtgt Low gt gt gtgt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gtgt gtgt gtgt gtgt gtgt gtgt gtgt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt 162.88 gt gtgt 162.99 gtgt gtgt 161.61 gtgt 161.82 gtgt 161.82 gt gtgt gtgt 161.82 gt gtgt gtgt 23.12.2014 gtgt 162.24 gtgt 161.61 gtgt 162.24 gtgt gtgt 4,043,300 gtgt gtgt 162.24 gtgt gtgt gtgt 22 dec 2014 gtgt gtgt 158.33 gt gtgt 161,91 gtgt Gtgt 158.33 gtgt gtgt 161.44 gtgt gtgt 4,682,500 gtgt gtgt 161.4 4 gtgt gtgtgtgt 19 dec, 2014 gtgt gtgt 160.41 gtgt 157.49 gtgt gtgt 158.51 gtgt gtgt 8.864.900 gtgt gtgt 158.51 gtgt gtgt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gtgt gtgt hidden email email mailing list - För att UNSUBSCRIBE och mer, se Gtgt stat. ethz. chmailmanlistinfor-help gtgt Läs läsningsguiden gtgt R-project. orgposting-guide. html gtgt och ge kommentar, minimal, fristående, reproducerbar kod. Gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt hidden gt e-mail mailing list - För UNSUBSCRIBE och mer, se gt stat. ethz. chmailmanlistinfor-help gt Läs läsningsguiden R-project. orgposting-guide. html gt och läs ge kommentarer, minimal, fristående, reproducerbar kod. dold email-postlista - För att UNSUBSCRIBE och mer, se stat. ethz. chmailmanlistinfor-help Läs läsningsguiden R-project. orgposting-guide. html och ge kommenterad, minimal, fristående, reproducerbar kod. På onsdag den 31 december 2014 kl. 11:24, skrev John Sorkin lthidden email gt: gt Windows 7 gt gt Kollegor, gt Jag använde funktionen fix () för att redigera en befintlig funktion när du använder RStudio. Efter att ha redigerat funktionen får jag möjlighet att SPARA den ändrade funktionen. Jag skulle vilja veta (1) var den ändrade funktionen lagras (knappen Spara har inte ett alternativ att ange var den ändrade funktionen sparas), och (2) hur jag kan komma åt den ändrade funktionen i andra RStudio eller R sessioner och (3) hur jag kan göra funktionen tillgänglig för R och RStudio-sessioner som körs på andra datorer. Jag använder inte RStudio, så jag har ingen aning om den överskrider funktionen basfix (). Men om det gör det här är fel plats att fråga om det, så heres basen R svarar. fix () sparar den redigerade funktionen till din arbetsytan. Det vill säga om du skriver ls () vid en R-prompt efter att ha kört fix (), kommer den att visa din nya redigerade funktion. De vanliga metoderna för att exportera något från R till hårddisken kommer att fungera, till exempel spara () och ladda (). Du kan också sätta din funktion i en textfil myfun. R och använd källan () för att läsa den in i R. När du har använt ett av dessa alternativ för att spara filen till disken, är den bärbar mellan R-sessioner och datorer. Jag tycker det är mycket bekvämare att använda en textredigerare och källa (), personligen, istället för att fixa (). Det underlättar övergången till att göra paket också. Gömd e-postlista - För att UNSUBSCRIBE och mer, se stat. ethz. chmailmanlistinfor-help Läs läsningsguiden R-project. orgposting-guide. html och kommentera, minimal, självständig, reproducerbar kod. Öppna det här inlägget i gängad vy Rapportera innehåll som olämpligt Re: Spara en redigerad R-funktion - RStudio and R Svar på det här inlägget av John Sorkin Den 31.12.2014 17:24 skrev John Sorkin: gt Windows 7 gt gt kollegor, gt I Använd funktionen fix () för att redigera en befintlig funktion när du använder RStudio. Efter att ha redigerat funktionen får jag möjlighet att SPARA den ändrade funktionen. Jag skulle vilja veta (1) var den ändrade funktionen lagras (knappen Spara har inte ett alternativ att ange var den ändrade funktionen sparas), och (2) hur jag kan komma åt den ändrade funktionen i andra RStudio eller R Sessioner och (3) hur jag kan göra funktionen tillgänglig för R och RStudio-sessioner som körs på andra datorer. Inte säker på vad detta har med RStudio att göra, men det är viktigt att det här är fel inställning, eftersom det inte går att göra funktionen tillgänglig i R då det sparas under ett annat namn. Om du verkligen vill ändra en funktion, ta dess källversion och rediger den direkt och spara sedan det under ett visst uttryckligt namn och skicka det till R. Bäst, Uwe Ligges gt Tack, John John John Smith Sorkin MD Ph. D. gt professor i medicinen gt chefen för biostatistik och informatik gt University of Maryland School of Medicine Division of Gerontology and Geriatric Medicine gt Baltimore VA Medical Center gt 10 nord greene street gt GRECC (BT18GR) gt Baltimore, MD 21201-1524 gt (telefon) 410 -605-7119 gt (Fax) 410-605-7913 (Vänligen ring telefonnummer ovan före faxning) gt gt Sekretesspolicy: gt Detta e-postmeddelande, inklusive eventuella bilagor, är enbart för avsedda mottagare (er) och kan innehålla konfidentiell och privilegierad information. All obehörig användning, upplysning eller distribution är förbjuden. Om du inte är avsedd mottagare, vänligen kontakta avsändaren via svar-e-post och förstör alla kopior av det ursprungliga meddelandet. Gt gt dold email-postlista - För att UNSUBSCRIBE och mer, se gt stat. ethz. chmailmanlistinfor-help gt Läs läsningsguiden R-project. orgposting-guide. html gt och ge kommentar, minimal, fristående, reproducerbar koda. gt dold email mailing list - För att UNSUBSCRIBE och mer, se stat. ethz. chmailmanlistinfor-help Läs läsningsguiden R-project. orgposting-guide. html och ge kommentarer, minimal, självständig, reproducerbar kod. Genomsnittlig Enkel flyttning genomsnittliga medelvärdenSimple moving average Du uppmanas att lösa den här uppgiften enligt uppgiftsbeskrivningen, med vilket språk du kanske vet. Beräknar det enkla glidande medlet av en serie siffror. Skapa en stateful funktionsklassinstans som tar en period och returnerar en rutin som tar ett tal som argument och ger ett enkelt glidande medelvärde av dess argument hittills. Ett enkelt glidande medelvärde är en metod för att beräkna ett medelvärde av en ström av siffror genom att endast beräkna de senaste 160 P 160-talen från strömmen, 160 var 160 P 160 är känd som perioden. Det kan genomföras genom att anropa en initialiseringsrutin med 160 P 160 som sitt argument 160 I (P), 160, som sedan ska returnera en rutin som, när den kallas med enskilda successiva medlemmar i en ström av tal, beräknar medelvärdet av (upp till), de senaste 160 P 160 av dem, kan ringa denna 160 SMA (). Ordet 160 stateful 160 i uppgiftsbeskrivningen hänvisar till behovet av 160 SMA () 160 för att komma ihåg viss information mellan samtal till den: 160 Perioden, 160 P 160 En beställd behållare med minst de senaste 160 P 160 numren från var och en av Dess enskilda samtal. Stateful 160 betyder också att successiva samtal till 160 I (), 160 initialiseraren, 160 ska returnera separata rutiner som gör 160 inte 160 delade sparade tillstånd så att de kunde användas på två oberoende dataströmmar. Pseudokod för implementering av 160 SMA 160 är: Denna version använder en bestående kö för att hålla de senaste p-värdena. Varje funktion som returneras från init-moving-genomsnittet har sitt tillstånd i en atom som håller ett kövärde. Denna implementering använder en cirkulär lista för att lagra siffrorna i fönstret i början av varje iterationspekare hänvisar till listcellen som håller värdet bara förflyttning ur fönstret och ersätts med det tillförda värdet. Använda en avslutningsredigering För närvarande kan denna sma vara nogc eftersom den allokerar en stängning på högen. Några flyktanalyser kunde ta bort heapfördelningen. Använda en strukturredigering Den här versionen undviker hällanslutningen av stängningen och håller data i stapelramen för huvudfunktionen. Samma utmatning: För att undvika att de flytande punkts approximationerna fortsätter att växa upp och växer, kan koden utföra en periodisk summa på hela cirkulärkön. Denna implementering producerar två (funktion) objekt delningstillstånd. Det är idiomatiskt i E att separera inmatning från utgång (läs från skriv) istället för att kombinera dem i ett objekt. Strukturen är densamma som implementeringen av Standard DeviationE. Elixirprogrammet nedan genererar en anonym funktion med en inbäddad period p, som används som perioden för det enkla glidande medlet. Körningsfunktionen läser numerisk ingång och skickar den till den nyupprettade anonyma funktionen och inspekterar sedan resultatet till STDOUT. Utgången visas nedan, med medelvärdet, följt av den grupperade ingången, som utgör grunden för varje glidande medelvärde. Erlang har stängningar, men oföränderliga variabler. En lösning är då att använda processer och ett enkelt meddelande som passerar baserat API. Matrisspråken har rutiner för att beräkna glidningsavvikelserna för en given sekvens av objekt. Det är mindre effektivt att slinga som i följande kommandon. Ständigt uppmanar till en ingång I. Som läggs till i slutet av en lista L1. L1 kan hittas genom att trycka på 2ND1, och medel kan hittas i ListOPS Tryck på ON för att avsluta programmet. Funktion som returnerar en lista som innehåller den genomsnittliga data för det medföljande argumentet Program som returnerar ett enkelt värde vid varje tillkännagivande: Listan är listan som medelvärde: p är perioden: 5 returnerar den genomsnittliga listan: Exempel 2: Använda programmet movinav2 , 5) - Initialisering av glidande medelberäkning, och definiera en period på 5 movinav2 (3, x): x - nya data i listan (värde 3) och resultatet lagras på variabel x och visas movinav2 (4, x) : x - ny data (värde 4), och det nya resultatet lagras på variabel x och visas (43) 2. Beskrivning av funktionen movinavg: variabel r - är resultatet (den genomsnittliga listan) som kommer att returneras variabel i - är indexvariabeln, och den pekar på slutet av dellistan som listan är medeltal. Variabel z - en hjälparvariabel Funktionen använder variabel i för att bestämma vilka värden av listan som ska beaktas i nästa genomsnittliga beräkning. Vid varje iteration pekar variabel I till det sista värdet i listan som kommer att användas i medelberäkningen. Så vi behöver bara ta reda på vilka som kommer att vara det första värdet i listan. Vanligtvis måste man överväga p-element, så det första elementet kommer att vara det som indexeras av (i-p1). Men vid de första iterationerna kommer denna beräkning normalt att vara negativ, så kommer följande ekvation att undvika negativa index: max (i-p1,1) eller, ordna ekvationen, max (i-p, 0) 1. Men antalet element på de första iterationerna kommer också att vara mindre, det korrekta värdet kommer att vara (slutindex - startindex 1) eller, ordna ekvationen, (i - (max (ip, 0) 1) 1) och sedan , (I-max (ip, 0)). Variabel z håller det vanliga värdet (max (ip), 0) så börjar indexindexet (z1) och nummerfältet blir (iz) mitt (lista, z1, iz) kommer att returnera listan över värde som kommer att vara medelvärde ( .) summerar dem summa (.) (iz) ri kommer att genomsyra dem och lagra resultatet på lämpligt ställe i resultatlistan fp1 skapar en partiell applikation som fastställer (i det här fallet) andra och tredje parametrarHur att beräkna glidande medelvärde utan med hjälp av filter () Det finns ett zillion svar på detta, för din fråga är verkligen: Hur släpper jag en tidsserie Så du kan söka på lämpliga sökord. Mitt svar är: Använd inte glidande medelvärden - det är patetiskt gammalt. Loess är en av de zillioner av alternativ du kan överväga. Posta på CV (statistik. stackexchange) för andra statistiska alternativ för tidsserieutjämning. Också den kvoteringskvot du uttryckte ovan är felaktig. konstruktioner av tillämpad typ är (R-nivå) slingor. Så har du gjort dina läxor genom att läsa En Intro till R (cran. r-project. orgdocmanualsR-intro. pdf) eller andra webbtutorials. Om inte, gör det innan du skickar vidare. Bert Gunter Genentech Nonclinical Biostatistics (650) 467-7374 quotData är inte information. Information är inte kunskap. Och kunskap är verkligen inte visdom. Quot H. Gilbert Welch På måndag 17 februari 2014 kl. 10:45 skrev C W lthidden email gt: gt Hej lista, gt Hur räknar jag ett glidande medelvärde utan att använda filter (). Filter () tycks inte ge viktade medelvärden. Gt gt jag tittar på tillämpa (), tapply. Men inget kvittot. gt gt Till exempel, gt gt datlt-c (1:20) gt-medelvärdet (dat1: 3) gt-medelvärdet (dat4: 6) gt-medelvärdet (dat7: 9) gt-medelvärdet (dat10: 12) gt gt etc. förstå punkten att tillämpa är att undvika loopar, hur ska jag införliva gt denna idé till att använda en tillämpning () gt gt Tack, gt Mike gt gt alternativ HTML-version borttagen gt gt gt dold email-postlista gt stat. ethz. chmailmanlistinfor-help gt Läs läsningsguiden R-project. orgposting-guide. html gt och ge kommentar, minimal, fristående, reproducerbar kod. Svar på det här inlägget av tmrsg11 Den 17 februari 2014 kl. 10:45 skrev CW: gt Hej lista, gt Hur räknar jag ett glidande medelvärde utan att använda filter (). Filter () tycks inte ge viktade medelvärden. gt gt jag tittar på tillämpa (), tapply. Men inget kvittot. gt gt Till exempel, gt gt datlt-c (1:20) gt-medelvärdet (dat1: 3) gt-medelvärdet (dat4: 6) gt-medelvärdet (dat7: 9) gt-medelvärdet (dat10: 12) gt gt etc. förstå punkten att tillämpa är att undvika loopar, hur ska jag införliva gt denna idé till att använda en tillämpa () gt Konstruera en vektor för att gruppera och använda tapply. Modulo division är en vanlig metod för att uppnå detta. Ibland kan seq-funktionen användas om du justerar längden ordentligt. gt tapply (dat, (0: ​​(längd (dat) -1)) 3, medelvärde) 0 1 2 3 4 5 6 2,0 5,0 8,0 11,0 14,0 17,0 19,5 tapply (dat, runda (seq 3), lenlängd (dat))), medelvärde) 1 2 3 4 5 6 7 1,5 4,5 8,0 11,0 14,5 18,0 20,0 Kommentaren om viktningsdos verkar inte exemplifieras i ditt exempel. gt Tack, gt Mike gt gt alternativ HTML-version raderad gt gt gt dold email-postlista gt stat. ethz. chmailmanlistinfor-help gt Var god läs postguiden R-project. orgposting-guide. html gt och ge kommentar, minimal, själv - behandlad, reproducerbar kod. David Winsemius Alameda, CA, USA Öppna detta inlägg i gängat perspektiv Rapportera innehåll som olämpligt Re: Hur man beräknar glidande medelvärde utan att använda filter () I svar på detta inlägg av Rui Barradas För 5 poäng glidande medel, filtrera (x, side2, filterrep (15, 5)), mot, filter (x, side2, filterrep (1, 5) Har de samma effekt, eftersom summan måste vara 1. Gabor Amp Rui: Jag är medveten om djurparken, jag gjorde Jag vill inte installera ett paket för en funktion. Samma orsak till sos-paketet. David, tack, det är vad jag letar efter. På måndag 17 februari 2014 kl 02:07 skrev Rui Barradas lthidden email gt: gt Hello , gt gt Många paket har en movind-medelfunktion, till exempel paket gtprognos. Eller gt gtbibliotek (sos) gt findFn (quotmoving averagequot) gt gt I ditt exempel är vad du beräknar inte exakt ett glidande medelvärde, men i gt kan beräknas med något som följande. gt gt s lt - (seqalong (dat) - 1) 3 gt sapply (split (dat, s), mean) gt Hoppas det här hjälper, gt gt Rui Barra das gt gt Em 17-02-2014 18:45, C W escreveu: gt gtgt Hej lista, gtgt Hur räknar jag ut ett glidande medelvärde utan att använda filter (). filter () tycks inte ge viktade medelvärden. gtgt gtgt Jag letar efter ansökan (), tapply. Men inget kvittot. Gtgt gtgt Till exempel, gtgt gtgt datlt-c (1:20) gtgt-medelvärdet (dat1: 3) gtgt-medelvärdet (dat4: 6) gtgt-medelvärdet (dat7: 9) gtgt-medelvärdet (dat10: 12) gtgt gtgt etc. gtgt gtgt I Förstå punkten att tillämpa är att undvika loopar, hur ska jag ta med denna idé till att använda en ansökan () gt gt gtgt gtgt gtgt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gt gtgt hidden email maillist gt gt stat. ethz. chmailmanlistinfor - help gtgt Läs läsningsguiden R-project. org gtgt posting-guide. html gtgt och ge kommentar, minimal, fristående, reproducerbar kod. Gtgt gtgt alternativ HTML-version raderad