# Create a fictional object with example data
obj <- list(
distance = rep(c(5, 10, 15, 20, 15, 10, 5),5),
targetRadious = 12,
r = list(start = 2, length = 10)
)
# Visualize the distance to the target using the function
showDistanceToTarget(obj)
Run the code above in your browser using DataLab