Description Usage Format Details Source References Examples
Percentages of Late Romano-British Oxford Pottery on 30 sites
1 | data("OxfordPots")
|
A data frame with 30 observations on the following 7 variables.
Place
Site name
OxfordPct
Percentage of Oxford pottery
OxfordDst
Distance to Oxford in miles
NewForestPct
Percentage of New Forest pottery
NewForestDst
Distance to New Forest
WalledArea
Acreage of walled towns
WaterTrans
Availability of a water transportation link, 1=probable presence
In several publications Ian Hodder analyzed the spatial distribution of Late Romano-British pottery produced at Oxford as evidence of trade and marketing patterns. These data come from the article by Fulford and Hodder (1974). In addition to the percentage of Oxford pottery and the distance to Oxford for 30 sites, data on New Forest pottery was included and information on walled town size and the availability of water transportation.
Fulford, M. and I. Hodder. 1974. A Regression Analysis of Some Late Romano-British Pottery: A Case Study. Oxoniensia 39: 26-33.
Hodder, I. 1974. A Regression Analysis of Some Trade and Marketing Patterns. World Archaeology 6: 172-189.
Hodder, I. and C. Orton. 1976. Spatial Analysis in Archaeology, pp 117-119.
1 2 3 4 5 6 7 8 9 10 11 | data(OxfordPots)
# Construct Fulford and Hodder's Figure 3
Oxford.lm1 <- lm(log(OxfordPct)~OxfordDst, OxfordPots, subset=WaterTrans==0)
Oxford.lm2 <- lm(log(OxfordPct)~OxfordDst, OxfordPots, subset=WaterTrans==1)
plot(log(OxfordPct)~OxfordDst, OxfordPots, xlim=c(0, 160), yaxt="n", ylim=c(0, 3.25),
ylab="Percentage of Oxford Pottery", xlab="Distance (miles)",
pch=c(1, 16)[WaterTrans+1], cex=1.5, lwd=2)
# Add log y-axis
axis(2, log(c(1, 5, 10, 20)), c(1, 5, 10, 20), las=1)
abline(Oxford.lm1, lwd=2)
abline(Oxford.lm2, lwd=2)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.