---snip--- Loenne : Vergleicht mal die beiden Charts Vom 7. Mai 2021 bis zum 18. Juni 2021
Bitcoin mit AMC
Naaaa, fällt was auf? ;-) ---snap---
Es gibt ja Quantmod für Gnu R - Ich finde es Over-engineered, aber ich bin mit xts-Objekten nie warm geworden... Naja, ich hab' mal schnell die Daten von Yahoo gezogen, die Returns auf die Schlusskurse berechnet und darauf die Korrelation (0.1554775), und beide Charts der Schlusskurse geplottet (und den Plot angehängt). Ich hoffe, da ist jetzt kein Fehler drin, ist ja auch nicht gerade früh am Tag. Naaaa, fällt was auf?
---snip--- > library(quantmod) > > BTC_ <- getSymbols("BTC-USD", from="2021-05-07", to="2021-06-18", src="yahoo", periodicity="daily", auto.assign=FALSE) > AMC_ <- getSymbols("AMC", from="2021-05-07", to="2021-06-18", src="yahoo", periodicity="daily", auto.assign=FALSE) > > cor(ROC(na.omit(merge(Cl(BTC_), Cl(AMC_))))[-1,]) BTC.USD.Close AMC.Close BTC.USD.Close 1.0000000 0.1554775 AMC.Close 0.1554775 1.0000000 > > par(mfrow=c(2,1)) > chart_Series(Cl(BTC_)) > chart_Series(Cl(AMC_)) ---snap--- |
Angehängte Grafik:
amc_vs_btc.png (verkleinert auf 62%)

