On this Picostat.com statistics page, you will find information about the austpop data set which pertains to Population figures for Australian States and Territories. The austpop data set is found in the DAAG R package. You can load the austpop data set in R by issuing the following command at the console data("austpop"). This will load the data into a variable called austpop. If R says the austpop data set is not found, you can try installing the package by issuing this command install.packages("DAAG") and then attempt to reload the data. If you need to download R, you can go to the R project website. You can download a CSV (comma separated values) version of the austpop R data set. The size of this file is about 456 bytes.

Population figures for Australian States and Territories

Description

Population figures for Australian states and territories for 1917, 1927, ..., 1997.

Usage

austpop

Format

This data frame contains the following columns:

year

a numeric vector

NSW

New South Wales population counts

Vic

Victoria population counts

Qld

Queensland population counts

SA

South Australia population counts

WA

Western Australia population counts

Tas

Tasmania population counts

NT

Northern Territory population counts

ACT

Australian Capital Territory population counts

Aust

Population counts for the whole country

Source

Australian Bureau of Statistics

Examples

print("Looping - Example 1.7")growth.rates <- numeric(8)
for (j in seq(2,9)) {
    growth.rates[j-1] <- (austpop[9, j]-austpop[1, j])/austpop[1, j] }
growth.rates <- data.frame(growth.rates)
row.names(growth.rates) <- names(austpop[c(-1,-10)])
  # Note the use of row.names() to name the rows of the data frame
growth.ratespause()
print("Avoiding Loops - Example 1.7b")sapply(austpop[,-c(1,10)], function(x){(x[9]-x[1])/x[1]})pause()
print("Plot - Example 1.8a")
attach(austpop)
plot(year, ACT, type="l") # Join the points ("l" = "line")
detach(austpop)pause()
print("Exerice 1.12.9")
attach(austpop)
oldpar <- par(mfrow=c(2,4))  
for (i in 2:9){
plot(austpop[,1], log(austpop[, i]), xlab="Year",
    ylab=names(austpop)[i], pch=16, ylim=c(0,10))}
par(oldpar) 
detach(austpop)

--

Dataset imported from https://www.r-project.org.