Home - News ( United States | United Kingdom | Italy | Germany ) - Football scores

Showing content from https://github.com/rpact-com/rpact/issues/81 below:

Optimize line breaks in the output of getObjectRCode() · Issue #81 · rpact-com/rpact · GitHub

The line breaks before and after the equal sign are not optimal.

Example 1:

getDesignInverseNormal(typeOfDesign = "OF", 
        informationRates = c(0.3333, 0.6667, 1), alpha = 0.025, beta = 0.2,
        futilityBounds = c(-6, -5), bindingFutility = FALSE, sided = 1) |>
    getSampleSizeSurvival(thetaH0 = 1, typeOfComputation =
            "Schoenfeld", pi1 = 0.4, pi2 = 0.2, allocationRatioPlanned = 1,
        eventTime = 12, accrualTime = c(0, 12), kappa = 1, followUpTime = 6, 
            dropoutRate1 = 0, dropoutRate2 = 0, dropoutTime = 12,
        accrualIntensity = 0.1) |>
    getObjectRCode(output = "cat") 

produces

getDesignInverseNormal(informationRates = c(0.3333, 0.6667, 1), futilityBounds = c(-6,
        -5)) |>
    getSampleSizeSurvival(pi1 = 0.4) 

Example 2:

getDesignInverseNormal(typeOfDesign = "OF", 
        informationRates = c(0.3333, 0.6667, 1), alpha = 0.025, beta = 0.2,
        futilityBounds = c(-6, -5), bindingFutility = FALSE, sided = 1) |>
    getSampleSizeSurvival(thetaH0 = 1, typeOfComputation =
            "Schoenfeld", pi1 = 0.4, pi2 = 0.2, allocationRatioPlanned = 1,
        eventTime = 12, accrualTime = c(0, 12), kappa = 1, followUpTime = 6, 
            dropoutRate1 = 0, dropoutRate2 = 0, dropoutTime = 12,
        accrualIntensity = 0.1) |>
    getObjectRCode(output = "cat", includeDefaultParameters = TRUE, stringWrapParagraphWidth = 70) 

produces

getDesignInverseNormal(typeOfDesign = "OF", informationRates =
        c(0.3333, 0.6667, 1), alpha = 0.025, beta = 0.2, futilityBounds
        =
        c(-6, -5), bindingFutility = FALSE, sided = 1, tolerance =
        1e-08) |>
    getSampleSizeSurvival(thetaH0 = 1, typeOfComputation =
        "Schoenfeld", pi1 = 0.4, pi2 = 0.2, allocationRatioPlanned = 1,
        eventTime = 12, accrualTime = c(0, 12), kappa = 1, followUpTime =
        6, dropoutRate1 = 0, dropoutRate2 = 0, dropoutTime = 12) 

RetroSearch is an open source project built by @garambo | Open a GitHub Issue

Search and Browse the WWW like it's 1997 | Search results from DuckDuckGo

HTML: 3.2 | Encoding: UTF-8 | Version: 0.7.4