Kategorie
Größe dieser Vorschau: 800 × 514 Pixel. Weitere Auflösungen: 320 × 206 Pixel | 640 × 411 Pixel | 1.024 × 658 Pixel | 1.400 × 900 Pixel.
Originaldatei (1.400 × 900 Pixel, Dateigröße: 26 KB, MIME-Typ: image/png)
Beschreibung
| Beschreibung | EUR - USD FX (foreign exchange rate) since EUROs do exist. ECB fixation |
| Datum | |
| Quelle | data from ECB EURUSD fixing [1], as of 25.10.2020. created with GNU R, see source below; |
| Urheber | origin Thomas Steiner |
| Genehmigung (Weiternutzung dieser Datei) |
Thomas Steiner put it under the CC-by-SA 2.5. |
| Andere Versionen | made to improve de:Bild:ChartUSD_EUR_99_06.JPG |
Diese Datei ist unter der Creative-Commons-Lizenz „Namensnennung – Weitergabe unter gleichen Bedingungen 2.5 generisch“ (US-amerikanisch) lizenziert.
- Dieses Werk darf von dir
- verbreitet werden – vervielfältigt, verbreitet und öffentlich zugänglich gemacht werden
- neu zusammengestellt werden – abgewandelt und bearbeitet werden
- Zu den folgenden Bedingungen:
- Namensnennung – Du musst angemessene Urheber- und Rechteangaben machen, einen Link zur Lizenz beifügen und angeben, ob Änderungen vorgenommen wurden. Diese Angaben dürfen in jeder angemessenen Art und Weise gemacht werden, allerdings nicht so, dass der Eindruck entsteht, der Lizenzgeber unterstütze gerade dich oder deine Nutzung besonders.
- Weitergabe unter gleichen Bedingungen – Wenn du das Material wiedermischst, transformierst oder darauf aufbaust, musst du deine Beiträge unter der gleichen oder einer kompatiblen Lizenz wie das Original verbreiten.
PNG‑Erstellung
Quelltext
R code
library(rsdmx)
raw = as.data.frame(readSDMX("https://www.ecb.europa.eu/stats/policy_and_exchange_rates/euro_reference_exchange_rates/html/usd.xml"))
greenback=rgb(red=13, green=82, blue=35, alpha=255, maxColorValue = 255)
greyusd=rgb(red=49, green=52, blue=45, alpha=255, maxColorValue = 255)
redusd=rgb(red=178, green=7, blue=25, alpha=255, maxColorValue = 255)
blueeur=rgb(red=0, green=50, blue=153, alpha=255, maxColorValue = 255)
yelloweuro=rgb(red=255, green=243, blue=21, alpha=255, maxColorValue = 255)
fixing=raw[,9]
date=as.Date(raw[,8],format="%Y-%m-%d")
items=seq(1,length(fixing),by=1) # setze "by=3" um weniger punkte zu zeichnen
png(filename="EurUsd.png", width=1400, height=900, pointsize=12)
par(bg=blueeur,mar=c(3,4.5,1.7,1.5)+0.1,font=2)
plot(date[items],fixing[items],type="n",xlim=c(10700,max(date)),xlab="",ylab="Wechselkurs (1 € = … USD)",cex.lab=1.7,col.lab="white",font.lab=2,col.axis="white",axes=FALSE)
usr=par("usr")
rect(xleft=usr[1], ybottom=usr[3], xright=usr[2], ytop=usr[4],col="white",border=NA)
yticks=seq(from=0.85,to=1.6,by=0.15)
axis(side=2,at=yticks,labels=format(yticks,nsmall=2,digits=3),font=2,col.axis="white",col="white",cex.axis=1.5,lwd=3)
yticksInner=seq(from=0.85,to=1.6,by=0.05)
axis(side=2,at=yticksInner,labels=NA,col.axis=NA,col.ticks=blueeur,lwd=0,lwd.ticks=2,tcl=0.5)
axis(side=4,at=yticksInner,labels=NA,col.axis=NA,col.ticks=blueeur,lwd=0,lwd.ticks=2,tcl=0.5)
startEUR=as.Date("1999-01-01")
xticks=as.Date(paste0(seq(1999,2023,by=2),"-1-1"))-startEUR
Sys.setlocale("LC_TIME", "German") #"Jan" und nicht "Jän"
axis(side=1,at=xticks+startEUR,labels=format(xticks+startEUR,"%b %y"),font=2,col.axis="white",col="white",cex.axis=1.5,lwd=3)
xticks2=as.Date(paste0(rep(seq(1999,2023,by=1),each=2),"-",c(1,7),"-1"))-startEUR
axis(side=1,at=xticks2+startEUR,labels=NA,col.axis=NA,col.ticks=blueeur,lwd=0,lwd.ticks=2,tcl=0.5)
axis(side=3,at=xticks2+startEUR,labels=NA,col.axis=NA,col.ticks=blueeur,lwd=0,lwd.ticks=2,tcl=0.5)
abline(v=xticks+startEUR,col=greyusd,lwd=1,lty="dotted") #statt grid
abline(h=yticks,col=greyusd,lwd=1,lty="dotted")
lines(date[items],fixing[items],col=greenback,lwd=3)
mini=which.min(fixing)
maxi=which.max(fixing)
lines(date[mini],fixing[mini],col=redusd,type="p",lwd=4,pch=23)
lines(date[maxi],fixing[maxi],col=redusd,type="p",lwd=4,pch=23)
legend(x=15500,y=1.58,"Wechselkurs EUR—USD ",adj=0,cex=2.85,bg=blueeur,text.col="white",border=NA)
dev.off()
The original dataset is available on the talk page.
Dateiversionen
Klicke auf einen Zeitpunkt, um diese Version zu laden.
| Version vom | Vorschaubild | Maße | Benutzer | Kommentar | |
|---|---|---|---|---|---|
| aktuell | 21:21, 5. Apr. 2023 | | 1.400 × 900 (26 KB) | wikimediacommons>Thire | data until now (apr 23) |
Dateiverwendung
Die folgende Seite verwendet diese Datei:
