Merge pull request #4 from SamT123/master

Fix bug in calculating residuals
acorg · Feb 27, 2024 · eff5ff6 · eff5ff6
2 parents 0b7e44e + 0235d03
commit eff5ff6
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/ablandscape_fit.R b/R/ablandscape_fit.R
@@ -99,7 +99,7 @@ ablandscape.fit <- function(
   )
 
   # Get residuals
-  fit_residuals <- fit$logtiters - fit$fitted.values
+  fit_residuals <- t(t(fit$logtiters) - fit$fitted.values)
 
   fit$residuals <- fit_residuals
   fit$residuals[fit$morethans | fit$lessthans] <- NA