générer un graphique utile à partir des données sous forme de tableau - « r » débutant

Question

Voici un diagramme d'un livre que je lis:

Je tente de représenter graphiquement ces données tabulaires en utilisant R.

C'est ce que j'ai jusqu'à présent:

a <- c(1000 , 5 , 1050 , 1050 , -2 , 1029 , 1029 , 4 , 1070 , 1070 , -3 , 
1038 , 1038 , 2 , 1059 , 1059 , 4 , 1101) 
matrix(a , 3 , 6) 

Ce code retourne:

[,1] [,2] [,3] [,4] [,5] [,6] 
[1,] 1000 1050 1029 1070 1038 1059 
[2,] 5 -2 4 -3 2 4 
[3,] 1050 1029 1070 1038 1059 1101 

Lorsque je tente de tracer ces données en utilisant:

> plot(matrix(a , 3 , 6)) 

Ceci est le résultat:

Ce graphique est pas très utile, im nouveau à 'R'. Y a-t-il un graphique plus intéressant qui peut être généré en utilisant 'R'? Comment cela peut-il être modifié pour que deux lignes soient tracées, avec la colonne «ETF A» sur l'axe «Y» et les lignes pour «Retour (% Augmentation ou Diminution), Solde, Fin d'Année) sur l'axe« X »?

Answer 1

Que diriez-vous ceci:

a <- c(1000 , 5 , 1050 , 1050 , -2 , 1029 , 1029 , 4 , 1070 , 1070 , -3 , 
    1038 , 1038 , 2 , 1059 , 1059 , 4 , 1101) 
x <- matrix(a , 3 , 6) 

# make it a data.frame :) 
z <- data.frame(b = c(x[1, ], x[3, ]), year = c(rep(0, 6), rep(1, 6))) 

# make a mysterious plot 
plot(z[, 2], z[, 1]) + segments(x0=z[1:6, 2], y0=z[1:6, 1], x1=z[7:12, 2], y1=z[7:12, 1]) 

Edits peut être fait pour changer les x et les laboratoires y, titre, etc. Tapez par dans la console pour voir beaucoup, beaucoup d'options?. La pente se rapporte très étroitement à votre pourcentage d'augmentation/diminution. :)