add_target_point: Target point
In leonardommarques/reliabilitytools: Reliability Analysis

Add target point and estimated survival of the models for the givem target.

add_target_point(ggaux, models_list, time_target = 0, surv_target = 1,
  legend_text = paste0("Target: ", surv_target * 100, "@", time_target),
  p_size = 5, p_shape = 18, t_size = 3, adj_axis = TRUE,
  failure_rate_plot = FALSE)

`time_target,`	surv_target: The target 'time' and 'survival'
`p_size,`	p_shape, t_size: point size, point shape and text size.
`adj_axis:`	if `TRUE`, plot will be adjusted to show all estimated survival for the models.
`failure_rate_plot:`	if `TRUE`, the estimates of failure rate (1-survival) will be ploted instead. This is usefull for weibull paper, mostly.
`ggaux:`	a `ggplot` object.
`legend_text:`	If not specified, the legend will be in the format "surv_target@time_target"
`models_list:`	An object or a `list` of objects returned from codemulti_surv_reg()