bubble_tail(animals[["chicken"]])
cat(bubble_tail(animals[["chicken"]]), sep = "\n")
cat(bubble_tail(animals[["chicken"]]), sep = "\n")
cat(bubble_tail(animals[["chicken"]], "%"), sep = "\n")
bubble_tail2(59)
cat(bubble_tail2(59), sep = "\n")
cat(bubble_tail2(11), sep = "\n")
cat(bubble_tail2(11, "%"), sep = "\n")
Run the code above in your browser using DataLab