"goalspergame" <-
structure(c(6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
6, 6, 6, 6, 12, 12, 12, 14, 14, 16, 15, 18, 18, 18, 18, 17, 21,
21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 22, 24, 26, 26, 26,
26, 26, 27, 60, 60, 60, 70, 70, 70, 70, 70, 70, 70, 70, 70, 70,
70, 70, 70, 70, 70, 70, 70, 70, 74, 76, 76, 78, 78, 78, 78, 80,
80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80,
80, 84, 84, 48, 82, 82, 82, 82, 1138, 1054, 978, 1148, 1139,
1090, 1006, 1009, 1059, 1064, 1130, 1175, 1217, 1238, 1261, 1264,
1249, 1166, 1208, 1277, 1252, 2476, 2718, 2649, 3409, 3348, 4088,
3783, 4932, 4913, 4783, 4747, 4757, 5902, 6447, 6741, 6493, 6627,
6530, 6667, 6165, 6237, 6286, 6189, 5805, 6123, 7299, 6982, 3727,
6701, 6213, 5602, 5830, 6.32, 5.86, 5.43, 5.47, 5.42, 5.19, 4.79,
4.8, 5.04, 5.07, 5.38, 5.6, 5.8, 5.9, 6, 6.02, 5.95, 5.55, 5.75,
6.08, 5.96, 5.58, 5.96, 5.81, 6.24, 6.13, 6.55, 6.47, 6.85, 6.82,
6.64, 6.59, 7, 7.03, 7.68, 8.03, 7.73, 7.89, 7.77, 7.94, 7.34,
7.43, 7.48, 7.37, 6.91, 6.96, 7.24, 6.39, 5.97, 6.29, 5.83, 5.26,
5.27), .Dim = as.integer(c(53, 4)), .Dimnames = list(NULL, c("n.teams",
"n.games", "n.goals", "gpg")), .Tsp = c(1946, 1998, 1), class = c("mts",
"ts"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.