I get the same results independent of what isK is set to. ``` temps <- c(1:3)*10 SVP(temps, isK = FALSE) # [1] 1.400726e-226 5.922165e-109 9.576120e-70 SVP(temps, isK = TRUE) # [1] 1.400726e-226 5.922165e-109 9.576120e-70 ```