Skip to content

Commit

Permalink
Add cbinded as data frame setup
Browse files Browse the repository at this point in the history
  • Loading branch information
mattfidler committed Jul 15, 2024
1 parent 4aba3e2 commit ddea956
Showing 1 changed file with 7 additions and 7 deletions.
14 changes: 7 additions & 7 deletions src/rxData.cpp
Original file line number Diff line number Diff line change
Expand Up @@ -3385,12 +3385,12 @@ static inline void rxSolve_parSetup(const RObject &obj,
rxSolveDat->parType = 2;
rxSolveDat->nmP = rxSolveDat->parDf.names();
rxSolveDat->nPopPar = rxSolveDat->parDf.nrows();
// } else if (rxSolveDat->par1cbind) {
// List tmp = as<List>(rxSolveDat->par1);
// rxSolveDat->parDf = as<DataFrame>(tmp[0]);
// rxSolveDat->parType = 2;
// rxSolveDat->nmP = rxSolveDat->parDf.names();
// rxSolveDat->nPopPar = rxSolveDat->parDf.nrows();
} else if (rxSolveDat->par1cbind) {
List tmp = as<List>(rxSolveDat->par1);
rxSolveDat->parDf = as<DataFrame>(tmp[0]);
rxSolveDat->parType = 2;
rxSolveDat->nmP = rxSolveDat->parDf.names();
rxSolveDat->nPopPar = rxSolveDat->parDf.nrows();
} else if (rxIs(rxSolveDat->par1, "matrix")) {
rxSolveDat->parMat = as<NumericMatrix>(rxSolveDat->par1);
rxSolveDat->nPopPar = rxSolveDat->parMat.nrow();
Expand Down Expand Up @@ -3990,7 +3990,7 @@ static inline void rxSolve_normalizeParms(const RObject &obj, const List &rxCont
rx_solving_options* op = rx->op;
rx_solving_options_ind* ind;
int curEvent = 0, curIdx = 0, curSolve=0;
switch(rxSolveDat->parType){
switch(rxSolveDat->parType) {
case 1: // NumericVector
{
if (rxSolveDat->nPopPar != 1) {
Expand Down

0 comments on commit ddea956

Please sign in to comment.