week_6 discussion

problem 5

part 1

• Draw tree diagram

library(data.tree)

## Warning: package 'data.tree' was built under R version 3.4.4

traveller <- Node$new("traveller")
route1 <- traveller$AddChild("Route A")
route1$AddChild("Route A")
route1$AddChild("Route B")
route1$AddChild("Route C")
route2 <- traveller$AddChild("Route b")
route2$AddChild("Route A")
route2$AddChild("Route B")
route2$AddChild("Route C")
route3 <- traveller$AddChild("Route C")
route3$AddChild("Route A")
route3$AddChild("Route B")
route3$AddChild("Route C")
plot(traveller)

• Solving mathematically direct quote from textbook ,“From the tree diagram we see that the total number of choices is the product of the number of choices at each stage.”
  • Therefore 3*3 = 9

part 2

traveller <- Node$new("traveller")
route1 <- traveller$AddChild("Route A")
route1$AddChild("Route B")
route1$AddChild("Route C")
route2 <- traveller$AddChild("Route B")
route2$AddChild("Route A")
route2$AddChild("Route C")
route3 <- traveller$AddChild("Route C")
route3$AddChild("Route A")
route3$AddChild("Route B")

plot(traveller)

• Mathematically 3 choices one way 2 choices on way back therefore 3*2=6