Zeitreihe: Verfügbare Daten Diagramme (ggplot)

Question

entdeckte ich das Paket nsRFA, die ich für Niederschlagsdaten analysys zu verwenden beabsichtigt, und ich fand die Funktion consistencyplot() die ich denke, ist erstaunlich.

> library(nsRFA) 
> data(hydroSIMN) 
> head(annualflows) 
    cod anno dato 
1 1 1956 1494 
2 1 1957 1309 
3 1 1958 1699 
4 1 1959 1467 
5 1 1960 1918 
6 1 1961 1469 
> y <- annualflows["anno"][,] 
> cod <- annualflows["cod"][,] 
> consistencyplot(y,cod) 

Aber ich konnte es nicht mit anderen Daten funktioniert aber das in dem Paket Beispiel Handbuch gegebene Beispiel (vignette("nsRFA_ex01", package="nsRFA")). Also habe ich versucht, die Handlung mit ggplot zu replizieren, aber leider bin ich verloren.

Ich fand es schwierig, ein aussagekräftiges Beispiel zu geben, aber kann man mit den Daten aus dem obigen Beispiel irgendeinen Vorschlag machen?

Answer 1

Man könnte es wie folgt tun:

library(ggplot2) 
library(dplyr) 
annualflows %>% ggplot(aes(x = anno, y = cod)) + 
    geom_point(
     shape = 45, 
     size = 5, 
     col = "blue" 
    ) + 
    scale_y_reverse(
     breaks = seq(10, 50, by = 10) 
    ) + 
    scale_x_continuous(breaks = seq(1920, 1980, by = 10)) + 
    labs(
     x = "Year", 
     y = "Code" 
    ) + 
    theme(
     panel.background = element_blank(), 
     panel.border = element_rect(fill = NA), 
     text = element_text(size = 10), 
     panel.grid.major.x = element_line(color = "grey80"), 
     panel.grid.major.y = element_line(color = "grey80") 
    )