File:Hexenanklagen Herzogtum Westfalen 1508–1732.svg
Page contents not supported in other languages.
Appearance
![File:Hexenanklagen Herzogtum Westfalen 1508–1732.svg](http://upload.wikimedia.org/wikipedia/commons/thumb/0/05/Hexenanklagen_Herzogtum_Westfalen_1508%E2%80%931732.svg/800px-Hexenanklagen_Herzogtum_Westfalen_1508%E2%80%931732.svg.png)
Size of this PNG preview of this SVG file: 800 × 400 pixels. Other resolutions: 320 × 160 pixels | 640 × 320 pixels | 1,024 × 512 pixels | 1,280 × 640 pixels | 2,560 × 1,280 pixels | 1,260 × 630 pixels.
Original file (SVG file, nominally 1,260 × 630 pixels, file size: 79 KB)
![]() | This is a file from the Wikimedia Commons. Information from its description page there is shown below. Commons is a freely licensed media file repository. You can help. |
Summary
DescriptionHexenanklagen Herzogtum Westfalen 1508–1732.svg |
Deutsch: Das Diagramm gibt die Zahl der Hexenanklagen im Herzogtum Westfalen zwischen 1508 und 1732 wieder. Die Daten sind insofern nicht vollständig, weil unbestimmte Angaben wie "mehrere, einige, usw." nicht berücksichtigt wurden.
Die Daten für die Grafik stammen von Rainer Decker: Die Hexenverfolgungen im Herzogtum Westfalen. In: Alfred Bruns (Red.): Hexen. Gerichtsbarkeit im kurkölnischen Sauerland. Schmallenberg, 1984 S.213-218 |
Date | |
Source | Own work |
Author | El Grafo |
Other versions |
![]() |
Licensing
I, the copyright holder of this work, hereby publish it under the following license:
![]() ![]() |
This file is made available under the Creative Commons CC0 1.0 Universal Public Domain Dedication. |
The person who associated a work with this deed has dedicated the work to the public domain by waiving all of their rights to the work worldwide under copyright law, including all related and neighboring rights, to the extent allowed by law. You can copy, modify, distribute and perform the work, even for commercial purposes, all without asking permission.
http://creativecommons.org/publicdomain/zero/1.0/deed.enCC0Creative Commons Zero, Public Domain Dedicationfalsefalse |
additional information
English: To recreate or modify the plot with R copy the Data to your favourite editor and save it as data.csv. If you update the plot, please remember to update the code too. Note: This code was written and tested on a Linux-machine. The SVG-export might work differently unter Windows. The R-package Cairo used together with the cairo graphics library (included in Inkscape) should do the trick.
Deutsch: Um die Grafik mit R neu zu erstellen oder zu modifizieren zunächst die Daten im Abschnitt Data in einen Texteditor kopieren und als data.csv abspeichern. Bei Änderungen an der Grafik bitte auch den Code aktualisieren. Anmerkung: Dieser Code wurde unter Linux erstellt. Eventuell funktioniert die SVG-Ausgabe unter Windows nicht. Abhilfe sollte das R-Paket Cairo in Verbindung mit der Cairo-Grafikbibliothek (z.B. in Inkscape enthalten) schaffen.
source code
# set working directory
setwd("/path/to/your/directory/") # <- the path to the folder that contains data.csv
# read the data
dat <- read.csv("data.csv")
# The default settings for labels and tick marks are not sufficient for this data set,
# so we have to work arond that. This vector contains the years we want to be displayed below
# the x-axis
labyears <- c(1508, 1523, 1530, 1564, 1574, 1579, 1590, 1595, 1600, 1606,
1611, 1617, 1626, 1630, 1637, 1641, 1652, 1660, 1670, 1676,
1681, 1685, 1691, 1695, 1701, 1707, 1712, 1728, 1732)
# open an SVG-device
svg(filename="Hexenanklagen Herzogtum Westfalen 1508–1732.svg", width=14, height=7, pointsize=12)
# set the margins around the plotting area (bottom, left, top, right)
par(mar=c(6, 5, 1, 1))
# set up the basic plot
plot(Angeklagte ~ Jahr, data=dat, bty="l",
type="n", # don't plot any data yet
xaxt="n", # don't display any labels or ticks for the x-axis
cex.axis=1.8, # magnify axis by 1.8
cex.lab=1.8, # magnify labels by 1.8
xlab="", # no title for the x-axis yet
ylab="Anklagen" # title for the y-axis
)
# add basic ticks for every year in the data set
axis(1, # x-axis
at=dat$Jahr, # position of ticks
labels=FALSE # still no labels
)
# add selected labels for the x-axis
axis(1, # x-axis
at=labyears, # only the years we defined earlier
las=3, # vertical labels
cex.axis=1.5, # size of the label text
lwd.ticks=1.8 # add bigger ticks for these labels
)
# add a title for the x-axis
title(xlab="Jahr",
line=5, # 5 "lines" below the axis
cex.lab=1.8 # size of the title text
)
# add a dashed line at "zero"
abline(a=0, b=0, lty=3)
# plot the lines
lines(Angeklagte ~ Jahr, data=dat, lwd=1.8, col="blue")
# plot the points
points(Angeklagte ~ Jahr, data=dat, pch=20, col="blue", cex=1.5)
# close the device
dev.off()
Data
"Jahr","Angeklagte","Hingerichtete" 1508,1,1 1523,4,4 1530,1,"NA" 1564,1,"NA" 1566,1,"NA" 1572,2,"NA" 1573,1,"NA" 1574,9,9 1575,7,7 1578,1,1 1579,3,3 1581,1,1 1584,5,5 1585,5,4 1587,9,"NA" 1588,1,"NA" 1589,1,1 1590,40,"NA" 1591,25,17 1592,13,6 1593,18,14 1594,11,8 1595,8,8 1596,25,16 1597,4,"NA" 1599,5,5 1600,3,"NA" 1601,3,"NA" 1602,3,"NA" 1603,7,5 1606,1,1 1611,1,1 1616,3,"NA" 1617,12,"NA" 1618,11,1 1619,4,1 1621,1,1 1626,2,2 1628,135,124 1629,183,164 1630,233,192 1631,18,15 1637,1,1 1641,8,"NA" 1642,5,4 1643,2,"NA" 1644,2,2 1652,44,41 1653,16,12 1654,18,15 1655,2,1 1656,9,5 1657,2,2 1658,1,1 1659,9,7 1660,6,5 1666,1,1 1667,1,1 1668,2,"NA" 1670,14,13 1671,8,7 1676,1,"NA" 1681,1,1 1682,5,2 1684,3,3 1685,4,3 1686,4,1 1688,7,"NA" 1691,10,10 1692,2,1 1695,1,1 1696,5,1 1698,4,"NA" 1701,1,1 1707,1,"NA" 1712,1,"NA" 1728,1,1 1732,1,"NA"
Captions
Add a one-line explanation of what this file represents
Items portrayed in this file
depicts
11 December 2011
File history
Click on a date/time to view the file as it appeared at that time.
Date/Time | Thumbnail | Dimensions | User | Comment | |
---|---|---|---|---|---|
current | 20:18, 11 December 2011 | ![]() | 1,260 × 630 (79 KB) | El Grafo | some scaling of text and symbols |
15:06, 11 December 2011 | ![]() | 1,260 × 630 (71 KB) | El Grafo |
File usage
No pages on the English Wikipedia use this file (pages on other projects are not listed).
Global file usage
The following other wikis use this file:
- Usage on de.wikipedia.org