Conserta erro em operador relacional.

parent fa85c70e
......@@ -319,7 +319,7 @@ source("config/setup.R")
baskara <- function(a, b, c) {
stopifnot(a != 0)
delta <- b^2 - 4 * a * c
if (delta > 0) {
if (delta >= 0) {
den <- 2 * a
sqrt_delta <- sqrt(delta)
x1 <- (-b - sqrt_delta)/den
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment