W tym samouczku wyja\u015bniono, jak to zrobi\u0107 szybko, korzystaj\u0105c z biblioteki wizualizacji danych ggplot2<\/a> .<\/span><\/p>\n Za\u0142\u00f3\u017cmy, \u017ce mamy nast\u0119puj\u0105cy zbi\u00f3r danych w R:<\/span><\/p>\n Mo\u017cemy u\u017cy\u0107 nast\u0119puj\u0105cego kodu, aby utworzy\u0107 podstawowy wykres szereg\u00f3w czasowych dla tego zbioru danych za pomoc\u0105 ggplot2:<\/span> <\/p>\n Mo\u017cemy u\u017cy\u0107 funkcjiscale_x_date ()<\/strong> * do sformatowania dat wy\u015bwietlanych wzd\u0142u\u017c osi x wykresu. Funkcja ta przyjmuje nast\u0119puj\u0105ce argumenty:<\/span><\/p>\n *<\/strong> Aby ta funkcja dzia\u0142a\u0142a, zmienna osi x musi by\u0107 zmienn\u0105 daty. Je\u015bli jeszcze nie jest, mo\u017cesz szybko przekonwertowa\u0107 go na taki, u\u017cywaj\u0105c as.Date(<\/strong> nazwa_zmiennej)<\/strong> .<\/span><\/em><\/p>\n Poni\u017cszy kod pokazuje, jak w praktyce wykorzysta\u0107 jeden z tych format\u00f3w:<\/span> <\/p>\n Mo\u017cesz tak\u017ce doda\u0107 cz\u0119stsze (lub rzadsze) przerwy wzd\u0142u\u017c osi x, u\u017cywaj\u0105c argumentu date_breaks<\/strong> . Na przyk\u0142ad mogliby\u015bmy wy\u015bwietla\u0107 daty co dwa tygodnie wzd\u0142u\u017c osi x:<\/span> <\/p>\n Mo\u017cemy r\u00f3wnie\u017c \u0142atwo pochyli\u0107 etykiety osi X, u\u017cywaj\u0105c nast\u0119puj\u0105cego argumentu:<\/span> <\/p>\n Na koniec mo\u017cemy zmieni\u0107 motyw, etykiety osi i tytu\u0142, aby wykres szereg\u00f3w czasowych by\u0142 bardziej atrakcyjny wizualnie:<\/span> <\/p>\n Kompletny przewodnik po najlepszych motywach ggplot2<\/a> Cz\u0119sto mo\u017cesz chcie\u0107 wykre\u015bli\u0107 szereg czasowy w R, aby zwizualizowa\u0107, jak warto\u015bci w szeregu czasowym zmieniaj\u0105 si\u0119 w czasie. W tym samouczku wyja\u015bniono, jak to zrobi\u0107 szybko, korzystaj\u0105c z biblioteki wizualizacji danych ggplot2 . Podstawowe kre\u015blenie szereg\u00f3w czasowych w R Za\u0142\u00f3\u017cmy, \u017ce mamy nast\u0119puj\u0105cy zbi\u00f3r danych w R: #create dataset df <- data.frame(date = as […]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[3],"tags":[],"class_list":["post-1103","post","type-post","status-publish","format-standard","hentry","category-przewodnik"],"yoast_head":"\n Podstawowe kre\u015blenie szereg\u00f3w czasowych w R<\/strong><\/span><\/h3>\n
#create dataset<\/span>\ndf <- data.frame(date = as<\/span> . Date<\/span> (\" 2021-01-01<\/span> \") - 0:99,\n sales = runif<\/span> (100, 10, 500) + seq<\/span> (50, 149)^2)\n\n#view first six rows\n<\/span>head(df)\n\n dirty date\n1 2021-01-01 2845.506\n2 2020-12-31 2837.849\n3 2020-12-30 3115.517\n4 2020-12-29 2847.161\n5 2020-12-28 3374.619\n6 2020-12-27 3182.005<\/strong><\/pre>\n library<\/span> (ggplot2)\n\n#create time series plot<\/span>\np <- ggplot(df, aes<\/span> (x=date, y=sales)) +\n geom_line()\n\n#display time series plot<\/span>\np\n<\/strong><\/pre>\n![\"Podstawowe](\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/series-temporellesr1.png\")
<\/p>\n Formatuj daty na osi X<\/strong><\/span><\/h3>\n
\n
p + scale_x_date<\/span> ( date_labels<\/span> = \" %b %Y<\/span> \")<\/strong> <\/pre>\n![\"Wykre\u015blanie](\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/series-temporellesr2.png\")
<\/p>\n p + scale_x_date<\/span> ( date_breaks<\/span> = \" 2 week<\/span> \")<\/strong> <\/pre>\n![\"Szereg](\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/series-temporellesr3.png\")
<\/p>\n p + theme<\/span> ( axis.text.x<\/span> = element_text<\/span> (angle= 50<\/span> , hjust= 1<\/span> ))<\/strong> <\/pre>\n![\"Przechyl](\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/series-temporellesr4.png\")
<\/p>\n p <- ggplot(df, aes<\/span> (x=date, y=sales)) +\n geom_line( color<\/span> =\" turquoise4<\/span> \") +\n theme_minimal() + \n labs(x=\"\", y=\" Sales<\/span> \", title=\" Total Sales (Past 100 Days)<\/span> \") +\n theme( plot.title<\/span> = element_text<\/span> (hjust=0.5, size=20, face=\" bold<\/span> \"))\n\np<\/strong> <\/pre>\n![\"Szeregi](\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/series-temporellesr5.png\")
<\/p>\n Dodatkowe zasoby<\/strong><\/span>
<\/span><\/h3>\n
Kompletny przewodnik po tytu\u0142ach ggplot2<\/a>
Jak tworzy\u0107 wykresy obok siebie w ggplot2<\/a><\/p>\n","protected":false},"excerpt":{"rendered":"