Plot is sometimes missing information.

[gowachin]

The text for deco stop is sometimes missing.

Ex : Missing 20' time mark above the second deco stop. A second dive with 19' depth time work.

d1 <- dive(40, 10)
d2 <- dive(30, 20)
ds <- ndive(d1, d2, inter = 60)
plot(ds)
summary(ds$dive2) # deco time is 20min

Should work like :

d2 <- dive(30, 19)
ds <- ndive(d1, d2, inter = 60)
plot(ds)
summary(ds$dive2) # deco time is 20min

It also could be nice to improve horizontal spacing for inter time and maj time.

[gowachin]

Short investigation : plot deco time depend on hold desat object structure, and time can appear thanks to times_inf function and time_print option. This specific example is not working because of duplicated time period at depth and deco stop !

# additionnal example for duplicate effect
d1 <- dive(40, 10)
d2 <- dive(15, 3) # deco stop will be 3 and time at depth is 3...so only one exist !
ds <- ndive(d1, d2, inter = 60)
plot(ds)

deco_print option for the plot.dive() function is not working.

Need to rethink this part of plot !

[gowachin]

Wrong plot for dive conso for specifi values. Ascent time is merged with bottom time.

library(DiveR)
dive <- dive(50, 10, secu = FALSE)
tank <- tank(15, 210, rules = list(rules = c(80, 50), sys = "bar"))
conso <- conso(dive, tank, cons = 26)
plot(conso)

Modification of consumption makes it right

conso_true <- conso(dive, tank, cons = 25)
plot(conso_true)