File:EurUsd.png

Size of this preview: 800 × 514 pixels. Other resolutions: 320 × 206 pixels | 640 × 411 pixels | 1,024 × 658 pixels | 1,400 × 900 pixels.

Original file ‎(1,400 × 900 pixels, file size: 26 KB, MIME type: image/png)

This is a file from the Wikimedia Commons. The description on its description page there is shown below.
Commons is a freely licensed media file repository. You can help.

Summary

DescriptionEurUsd.png	EUR - USD FX (foreign exchange rate) since EUROs do exist. ECB fixation
Date	25 October 2020
Source	data from ECB EURUSD fixing [1], as of 25.10.2020. created with GNU R, see source below;
Author	origin Thomas Steiner
Permission (Reusing this file)	Thomas Steiner put it under the CC-by-SA 2.5.
Other versions	made to improve de:Bild:ChartUSD_EUR_99_06.JPG

This file is licensed under the Creative Commons Attribution-Share Alike 2.5 Generic license.

You are free:

to share – to copy, distribute and transmit the work
to remix – to adapt the work

Under the following conditions:

attribution – You must give appropriate credit, provide a link to the license, and indicate if changes were made. You may do so in any reasonable manner, but not in any way that suggests the licensor endorses you or your use.
share alike – If you remix, transform, or build upon the material, you must distribute your contributions under the same or compatible license as the original.

PNG development

This chart was created with R.

Source code

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.

File history

Click on a date/time to view the file as it appeared at that time.

	Date/Time	Dimensions	User	Comment
current	21:21, 5 April 2023	1,400 × 900 (26 KB)	Thire	data until now (apr 23)
	14:49, 19 July 2022	1,400 × 900 (26 KB)	Thire	data until 19.7.22
	08:15, 22 May 2022	1,400 × 900 (25 KB)	Thire	update as of 22.5.2022
	21:26, 23 January 2022	1,400 × 900 (52 KB)	Thire	update as of 23rd jan 2022
	07:59, 23 November 2021	1,400 × 900 (26 KB)	Thire	data up to nov 2021 from ecb
	20:23, 3 February 2021	1,400 × 901 (26 KB)	Thire	update exb fixing end january 21
	20:17, 3 February 2021	1,400 × 900 (24 KB)	Thire	update time, end jan 2021
	23:20, 24 October 2020	1,400 × 900 (26 KB)	Thire	innere markierer achsen etc
	22:20, 24 October 2020	1,400 × 900 (24 KB)	Thire	ecb data dirctly. see source Code in desc of page. DATA until oct 23 / 2020
	00:28, 19 October 2020	1,200 × 768 (21 KB)	Thire	update as of oct 2020 and ECB data, see desc page