Wikipedia

Datei:EurUsd.png

Originaldatei ‎(1.400 × 900 Pixel, Dateigröße: 26 KB, MIME-Typ: image/png)

Diese Datei und die Informationen unter dem roten Trennstrich werden aus dem zentralen Medienarchiv Wikimedia Commons eingebunden.

Zur Beschreibungsseite auf Commons

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
w:de:Creative Commons
Namensnennung Weitergabe unter gleichen Bedingungen
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

InfoField
 
Dieses Chart wurde mit R erstellt.

Quelltext

InfoField

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.

Kurzbeschreibungen

Ergänze eine einzeilige Erklärung, was diese Datei darstellt.

In dieser Datei abgebildete Objekte

Motiv

MIME-Typ

image/png

Dateiversionen

Klicke auf einen Zeitpunkt, um diese Version zu laden.

(neueste | älteste) Zeige (jüngere 10 | ) (10 | 20 | 50 | 100 | 250 | 500)
Version vomVorschaubildMaßeBenutzerKommentar
aktuell23:21, 5. Apr. 2023Vorschaubild der Version vom 23:21, 5. Apr. 20231.400 × 900 (26 KB)Thiredata until now (apr 23)
16:49, 19. Jul. 2022Vorschaubild der Version vom 16:49, 19. Jul. 20221.400 × 900 (26 KB)Thiredata until 19.7.22
10:15, 22. Mai 2022Vorschaubild der Version vom 10:15, 22. Mai 20221.400 × 900 (25 KB)Thireupdate as of 22.5.2022
23:26, 23. Jan. 2022Vorschaubild der Version vom 23:26, 23. Jan. 20221.400 × 900 (52 KB)Thireupdate as of 23rd jan 2022
09:59, 23. Nov. 2021Vorschaubild der Version vom 09:59, 23. Nov. 20211.400 × 900 (26 KB)Thiredata up to nov 2021 from ecb
22:23, 3. Feb. 2021Vorschaubild der Version vom 22:23, 3. Feb. 20211.400 × 901 (26 KB)Thireupdate exb fixing end january 21
22:17, 3. Feb. 2021Vorschaubild der Version vom 22:17, 3. Feb. 20211.400 × 900 (24 KB)Thireupdate time, end jan 2021
01:20, 25. Okt. 2020Vorschaubild der Version vom 01:20, 25. Okt. 20201.400 × 900 (26 KB)Thireinnere markierer achsen etc
00:20, 25. Okt. 2020Vorschaubild der Version vom 00:20, 25. Okt. 20201.400 × 900 (24 KB)Thireecb data dirctly. see source Code in desc of page. DATA until oct 23 / 2020
02:28, 19. Okt. 2020Vorschaubild der Version vom 02:28, 19. Okt. 20201.200 × 768 (21 KB)Thireupdate as of oct 2020 and ECB data, see desc page
(neueste | älteste) Zeige (jüngere 10 | ) (10 | 20 | 50 | 100 | 250 | 500)

Globale Dateiverwendung

Die nachfolgenden anderen Wikis verwenden diese Datei:

Abgerufen von „https://de.wikipedia.org/wiki/Datei:EurUsd.png“