fix first steps with travis

sestelo · sestelo · Oct 27, 2017 · Feb 14, 2017 · Feb 14, 2017 · Sep 28, 2017
commit bd8e59b6a7d86f6be39df7904690627184edaad8
diff --git a/.travis.yml b/.travis.yml
@@ -8,4 +8,8 @@ r:
   - devel
 
 
-warnings_are_errors: true
+warnings_are_errors: true
+
+
+notifications:
+    slack: newstat:ZqBL05R4NoRMqPZXnuzbF4OZ
diff --git a/R/allotest.R b/R/allotest.R
@@ -209,6 +209,7 @@ allotest <- function(formula, data = data, na.action = "na.omit",
 
 
 sta_res <- function(x, y){
+  y[y == 0] <- 0.0001
   model <- lm(log(y) ~ log(x))
   muhat <- exp(coef(model)[1]) * x**coef(model)[2]
   residuo <- y - muhat
@@ -221,6 +222,7 @@ sta_res <- function(x, y){
 }
 
 sta_rss <- function(x, y){
+  y[y == 0] <- 0.0001
   model <- lm(log(y) ~ log(x))
   m0 <- exp(coef(model)[1]) * x**coef(model)[2]
   rss0 <- sum((y - m0)**2)

diff --git a/src/.gitignore b/src/.gitignore
@@ -1,2 +1,3 @@
 NPRegfast.so
 program2.o
+lsq.mod
diff --git a/src/lsq.mod b/src/lsq.mod