Plot

ggplot(games, aes( x = average_rating, y = playing_time)) + 
  geom_point() +
  labs(title="Playing time by average rating", x="Rating", y = "Playing time [min/d]") +
  theme_bw()

Table

games.table <- games[1:30, c("game_id", "category", "playing_time")]

better.colnames <- c("Game ID", "Category", "Playtime [min/d]")

table <- kable(games.table,
      col.names = better.colnames,
      digits = c(0, 0, 1), #how many decimal places are shown for numeric columns
      align = c("llc"),
      caption = "Games Player Table"
      ) |>
  add_header_above(c("Player" = 1, "Information" = 2)) |>
  pack_rows(index = c("Group 1" = 10, "Group 2" = 10, "Group 3" = 10))
table
Games Player Table
Player
Information
Game ID Category Playtime [min/d]
Group 1
1 Economic,Negotiation,Political 240
2 Card Game,Fantasy 30
3 Abstract Strategy,Medieval 60
4 Ancient 60
5 Economic 90
6 Civilization,Nautical 240
7 Abstract Strategy 20
8 Civilization,Fantasy 120
9 Exploration 90
10 Fantasy,Travel 60
Group 2
11 Card Game,Farming,Negotiation 45
12 Ancient,Mythology 60
13 Negotiation 120
14 Negotiation 25
15 Bluffing,Negotiation,Science Fiction 90
16 Economic 60
17 Collectible Components,Dice,Fighting,Print & Play 5
18 Miniatures,Racing,Science Fiction 120
19 American West,Bluffing,City Building 45
20 Science Fiction 90
Group 3
22 Adventure,Exploration,Fantasy 240
23 Fantasy,Political,Wargame 360
24 Civilization,Negotiation,Political,Science Fiction,Space Exploration,Wargame 240
25 Exploration,Fantasy,Wargame 200
26 Civilization,Economic,Medieval,Renaissance 360
27 Economic,Political,Wargame 340
28 Card Game,Humor,Negotiation,Political 180
29 Fighting,Humor 120
30 Adventure,Electronic,Exploration,Fantasy,Fighting 90
31 Adventure,Exploration,Fantasy,Fighting,Miniatures 90

Images

knitr::include_graphics(c("images/K-9 image 1.png", "images/10th doctor.png"))
Good Boy and John SmithGood Boy and John Smith

Good Boy and John Smith

Some Very Diffcult Maths

x <- pi
y <- exp(1)

result <- x*y

Result of the Very Difficult Maths

The result of the calculation is 8.5397342.

List

  • surely this is how to make a list
  • how exciting
  • if i were creative I’d add some more items here

Check Boxes

LS0tCnRpdGxlOiAiUm1kIFByYWN0aWNhbCIKZGF0ZTogImByIFN5cy5EYXRlKClgIgpvdXRwdXQ6CiAgICBodG1sX2RvY3VtZW50OgogICAgICBjc3M6IGJvb3RzdHJhcC5jc3MKICAgICAgaGlnaGxpZ2h0OiBrYXRlICMgKGF2YWlsYWJsZTogZGVmYXVsdCwgdGFuZ28sIHB5Z21lbnRzLCBrYXRlLCBtb25vY2hyb21lLCBlc3ByZXNzbywgemVuYnVybiwgaGFkZG9jaywgYnJlZXplZGFyaywgYW5kIHRleHRtYXRlKQogICAgICBmaWdfY2FwdGlvbjogdHJ1ZQogICAgICBjb2RlX2Rvd25sb2FkOiB0cnVlICMgc2hvdy9oaWRlIGNvZGUgZG93bmxvYWQgYnV0dG9uCiAgICAgICNjb2RlX2ZvbGRpbmc6IHNob3cgIyBvcHRpb24gdG8gc2hvdy9oaWRlIGNvZGUgY2h1bmtzCiAgICAgIHRvYzogdHJ1ZSAjIHNob3cvaGlkZSBUYWJsZSBPZiBDb250ZW50cwogICAgICB0b2NfZmxvYXQ6IHRydWUgIyBzaG93IFRvQyBhbGwgdGhlIHRpbWUgb3Igb25seSBhdCB0b3AKICAgIHBkZl9kb2N1bWVudDogZGVmYXVsdAotLS0KCmBgYHtyIHNldHVwLCBpbmNsdWRlPUZBTFNFfQoKb3B0aW9ucyhyZXBvcyA9IGMoQ1JBTiA9ICJodHRwczovL2Nsb3VkLnItcHJvamVjdC5vcmciKSkKCmlmKCJsaWJyYXJpYW4iICVpbiUgaW5zdGFsbGVkLnBhY2thZ2VzKCk9PUZBTFNFKSBpbnN0YWxsLnBhY2thZ2VzKCJsaWJyYXJpYW4iKQoKbGlicmFyaWFuOjpzaGVsZihnZ3Bsb3QyKQpsaWJyYXJpYW46OnNoZWxmKGtuaXRyKQpsaWJyYXJpYW46OnNoZWxmKGthYmxlRXh0cmEpCgprbml0cjo6b3B0c19jaHVuayRzZXQoZWNobyA9IFRSVUUpCgpgYGAKCgpgYGB7ciBkYXRhLCBlY2hvPUZBTFNFLCByZXN1bHRzPSdoaWRlJywgY2FjaGU9VFJVRX0KCmdhbWVzIDwtIHJlYWQuY3N2KCJnYW1lcy5jc3YiKQpoZWFkKGdhbWVzKQpjb2xuYW1lcyhnYW1lcykKCmBgYAoKIyMgUGxvdAoKYGBge3IgcGxvdCwgZWNobz1UUlVFLCBmaWcud2lkdGg9NiwgZmlnLmhlaWdodD00LCBmaWcuYWxpZ249J2NlbnRlcicsIGNhY2hlLmV4dHJhPWZpbGUubXRpbWUoImdhbWVzLmNzdiIpfQoKZ2dwbG90KGdhbWVzLCBhZXMoIHggPSBhdmVyYWdlX3JhdGluZywgeSA9IHBsYXlpbmdfdGltZSkpICsgCiAgZ2VvbV9wb2ludCgpICsKICBsYWJzKHRpdGxlPSJQbGF5aW5nIHRpbWUgYnkgYXZlcmFnZSByYXRpbmciLCB4PSJSYXRpbmciLCB5ID0gIlBsYXlpbmcgdGltZSBbbWluL2RdIikgKwogIHRoZW1lX2J3KCkKCmBgYAoKIyMgVGFibGUKCmBgYHtyIHRhYmxlLCBlY2hvPVRSVUUsIHJlc3VsdHM9J2FzaXMnLCBjYWNoZT1UUlVFfQoKZ2FtZXMudGFibGUgPC0gZ2FtZXNbMTozMCwgYygiZ2FtZV9pZCIsICJjYXRlZ29yeSIsICJwbGF5aW5nX3RpbWUiKV0KCmJldHRlci5jb2xuYW1lcyA8LSBjKCJHYW1lIElEIiwgIkNhdGVnb3J5IiwgIlBsYXl0aW1lIFttaW4vZF0iKQoKdGFibGUgPC0ga2FibGUoZ2FtZXMudGFibGUsCiAgICAgIGNvbC5uYW1lcyA9IGJldHRlci5jb2xuYW1lcywKICAgICAgZGlnaXRzID0gYygwLCAwLCAxKSwgI2hvdyBtYW55IGRlY2ltYWwgcGxhY2VzIGFyZSBzaG93biBmb3IgbnVtZXJpYyBjb2x1bW5zCiAgICAgIGFsaWduID0gYygibGxjIiksCiAgICAgIGNhcHRpb24gPSAiR2FtZXMgUGxheWVyIFRhYmxlIgogICAgICApIHw+CiAgYWRkX2hlYWRlcl9hYm92ZShjKCJQbGF5ZXIiID0gMSwgIkluZm9ybWF0aW9uIiA9IDIpKSB8PgogIHBhY2tfcm93cyhpbmRleCA9IGMoIkdyb3VwIDEiID0gMTAsICJHcm91cCAyIiA9IDEwLCAiR3JvdXAgMyIgPSAxMCkpCnRhYmxlCgpgYGAKCiMjIEltYWdlcwoKYGBge3IgaW1hZ2VzLCBmaWcuc2hvdz0naG9sZCcsIG91dC5oZWlnaHQ9JzMwMHB4Jywgb3V0LmV4dHJhPSdzdHlsZT0iZGlzcGxheTppbmxpbmUtYmxvY2s7IHZlcnRpY2FsLWFsaWduOnRvcDsiJywgZmlnLmNhcD0nR29vZCBCb3kgYW5kIEpvaG4gU21pdGgnLCBjYWNoZT1UUlVFfQoKa25pdHI6OmluY2x1ZGVfZ3JhcGhpY3MoYygiaW1hZ2VzL0stOSBpbWFnZSAxLnBuZyIsICJpbWFnZXMvMTB0aCBkb2N0b3IucG5nIikpCgpgYGAKCgojIyBTb21lIFZlcnkgRGlmZmN1bHQgTWF0aHMKCmBgYHtyIGNhbGN1bGF0aW9uLCBlY2hvPVRSVUUsIHJlc3VsdHM9J2hpZGUnLCBjYWNoZT1UUlVFfQoKeCA8LSBwaQp5IDwtIGV4cCgxKQoKcmVzdWx0IDwtIHgqeQoKYGBgCgoKIyMjIFJlc3VsdCBvZiB0aGUgVmVyeSBEaWZmaWN1bHQgTWF0aHMKClRoZSByZXN1bHQgb2YgdGhlIGNhbGN1bGF0aW9uIGlzIGByIHJlc3VsdGAuCgoKIyMgTGlzdAoKLSBzdXJlbHkgdGhpcyBpcyBob3cgdG8gbWFrZSBhIGxpc3QKLSBob3cgZXhjaXRpbmcKLSBpZiBpIHdlcmUgY3JlYXRpdmUgSSdkIGFkZCBzb21lIG1vcmUgaXRlbXMgaGVyZQoKIyMjIENoZWNrIEJveGVzCi0gWyBdIHRpY2sgdGhpcyBjaGVjayBib3gKLSBbIF0gYW5kIHRoaXMgb25lCi0gW3hdIHRoaXMgb25lIGlzIGFscmVhZHkgY2hlY2tlZAoKCiMjIEh5cGVybGluawoKSSdsbCBiZSBwcmV0ZW50aW91cyBhbmQgbGluayBteSBPUkNpRCBbaGVyZV0oaHR0cHM6Ly9vcmNpZC5vcmcvMDAwOS0wMDA0LTY2NzYtMTg3MCkuCg==