walklist=list(
list(c(2L,5L,6L), # 1
c(1L,3L,5L,6L,7L), # 2
c(2L,4L,6L,7L,8L), # 3
c(3L,7L,8L), # 4
c(1L,2L,6L,9L,10L), # 5
c(1L,2L,3L,5L,7L,9L,10L,11L), # 6
c(2L,3L,4L,6L,8L,10L,11L,12L), # 7
c(3L,4L,7L,11L,12L), # 8
c(5L,6L,10L,13L,14L), # 9
c(5L,6L,7L,9L,11L,13L,14L,15L), # 10
c(6L,7L,8L,10L,12L,14L,15L,16L), # 11
c(7L,8L,11L,15L,16L), # 12
c(9L,10L,14L), # 13
c(9L,10L,11L,13L,15L), # 14
c(10L,11L,12L,14L,16L), # 15
c(11L,12L,15L)), # 16
list(c(4L,2L,5L), # 1
c(1L,4L,5L,6L,3L), # 2
c(2L,5L,6L), # 3
c(1L,2L,5L,7L,8L), # 4
c(1L,2L,3L,4L,6L,7L,8L,9L), # 5
c(2L,3L,5L,8L,9L), # 6
c(4L,5L,8L), # 7
c(4L,7L,5L,6L,9L), # 8
c(5,8,6)), # , # 9
list(c(2L,3L,4L),
c(1L,3L,4L),
c(1L,2L,4L),
c(1L,2L,3L))) #
names(walklist)=c(16,9,4)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.