Skip to content

Commit 91abdfd

Browse files
sbalcisbalci
committed
v0.0.32.62 Disable parametric survival model features
Commented out parametric survival model methods in survival.b.R and removed related result items, tables, and plots from survival.h.R and survival.r.yaml. This disables parametric survival model functionality in the UI and backend, as these options are currently not enabled.
1 parent d79b7b4 commit 91abdfd

File tree

7 files changed

+736
-1610
lines changed

7 files changed

+736
-1610
lines changed

‎DESCRIPTION‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
Type: Package
22
Package: jsurvival
33
Title: Survival Module of ClinicoPath for jamovi
4-
Version: 0.0.32.61
4+
Version: 0.0.32.62
55
Date: 2025-12-28
66
Authors@R: person(given = "Serdar", family = "Balci", role = c("aut",
77
"cre"), email = "serdarbalci@serdarbalci.com", comment =

‎R/survival.b.R‎

Lines changed: 563 additions & 561 deletions
Large diffs are not rendered by default.

‎R/survival.h.R‎

Lines changed: 0 additions & 199 deletions
Original file line numberDiff line numberDiff line change
@@ -506,14 +506,6 @@ survivalResults <- if (requireNamespace("jmvcore", quietly=TRUE)) R6::R6Class(
506506
residualsPlot = function() private$.items[["residualsPlot"]],
507507
calculatedtime = function() private$.items[["calculatedtime"]],
508508
outcomeredefined = function() private$.items[["outcomeredefined"]],
509-
parametricModelComparison = function() private$.items[["parametricModelComparison"]],
510-
parametricModelSummary = function() private$.items[["parametricModelSummary"]],
511-
parametricDiagnostics = function() private$.items[["parametricDiagnostics"]],
512-
parametricSurvivalPlot = function() private$.items[["parametricSurvivalPlot"]],
513-
hazardFunctionPlot = function() private$.items[["hazardFunctionPlot"]],
514-
extrapolationPlot = function() private$.items[["extrapolationPlot"]],
515-
extrapolationTable = function() private$.items[["extrapolationTable"]],
516-
parametricModelsExplanation = function() private$.items[["parametricModelsExplanation"]],
517509
clinicalGlossaryExplanation = function() private$.items[["clinicalGlossaryExplanation"]],
518510
clinicalInterpretationExplanation = function() private$.items[["clinicalInterpretationExplanation"]],
519511
copyReadySentencesExplanation = function() private$.items[["copyReadySentencesExplanation"]]),
@@ -1295,189 +1287,6 @@ survivalResults <- if (requireNamespace("jmvcore", quietly=TRUE)) R6::R6Class(
12951287
"multievent",
12961288
"explanatory",
12971289
"outcomeLevel")))
1298-
self$add(jmvcore::Table$new(
1299-
options=options,
1300-
name="parametricModelComparison",
1301-
title="Parametric Model Comparison",
1302-
visible="(use_parametric && compare_distributions)",
1303-
rows=0,
1304-
columns=list(
1305-
list(
1306-
`name`="distribution",
1307-
`title`="Distribution",
1308-
`type`="text"),
1309-
list(
1310-
`name`="aic",
1311-
`title`="AIC",
1312-
`type`="number",
1313-
`format`="zto"),
1314-
list(
1315-
`name`="bic",
1316-
`title`="BIC",
1317-
`type`="number",
1318-
`format`="zto"),
1319-
list(
1320-
`name`="loglik",
1321-
`title`="Log-Likelihood",
1322-
`type`="number",
1323-
`format`="zto"),
1324-
list(
1325-
`name`="df",
1326-
`title`="df",
1327-
`type`="integer")),
1328-
clearWith=list(
1329-
"use_parametric",
1330-
"compare_distributions",
1331-
"parametric_distribution",
1332-
"explanatory",
1333-
"outcome")))
1334-
self$add(jmvcore::Table$new(
1335-
options=options,
1336-
name="parametricModelSummary",
1337-
title="Parametric Model Results",
1338-
visible="(use_parametric)",
1339-
rows=0,
1340-
columns=list(
1341-
list(
1342-
`name`="parameter",
1343-
`title`="Parameter",
1344-
`type`="text"),
1345-
list(
1346-
`name`="estimate",
1347-
`title`="Estimate",
1348-
`type`="number",
1349-
`format`="zto"),
1350-
list(
1351-
`name`="se",
1352-
`title`="SE",
1353-
`type`="number",
1354-
`format`="zto"),
1355-
list(
1356-
`name`="ci_lower",
1357-
`title`="Lower",
1358-
`superTitle`="95% CI",
1359-
`type`="number",
1360-
`format`="zto"),
1361-
list(
1362-
`name`="ci_upper",
1363-
`title`="Upper",
1364-
`superTitle`="95% CI",
1365-
`type`="number",
1366-
`format`="zto"),
1367-
list(
1368-
`name`="pvalue",
1369-
`title`="p-value",
1370-
`type`="number",
1371-
`format`="zto,pvalue")),
1372-
clearWith=list(
1373-
"use_parametric",
1374-
"parametric_distribution",
1375-
"parametric_covariates",
1376-
"explanatory",
1377-
"outcome")))
1378-
self$add(jmvcore::Html$new(
1379-
options=options,
1380-
name="parametricDiagnostics",
1381-
title="Parametric Model Diagnostics",
1382-
visible="(use_parametric && parametric_diagnostics)",
1383-
clearWith=list(
1384-
"use_parametric",
1385-
"parametric_diagnostics",
1386-
"parametric_distribution",
1387-
"explanatory",
1388-
"outcome")))
1389-
self$add(jmvcore::Image$new(
1390-
options=options,
1391-
name="parametricSurvivalPlot",
1392-
title="Parametric Survival Curves",
1393-
width=600,
1394-
height=450,
1395-
renderFun=".plotParametricSurvival",
1396-
requiresData=TRUE,
1397-
visible="(use_parametric && parametric_survival_plots)",
1398-
clearWith=list(
1399-
"use_parametric",
1400-
"parametric_survival_plots",
1401-
"parametric_distribution",
1402-
"explanatory",
1403-
"outcome")))
1404-
self$add(jmvcore::Image$new(
1405-
options=options,
1406-
name="hazardFunctionPlot",
1407-
title="Hazard Function Plot",
1408-
width=600,
1409-
height=450,
1410-
renderFun=".plotHazardFunction",
1411-
requiresData=TRUE,
1412-
visible="(use_parametric && hazard_plots)",
1413-
clearWith=list(
1414-
"use_parametric",
1415-
"hazard_plots",
1416-
"parametric_distribution",
1417-
"explanatory",
1418-
"outcome")))
1419-
self$add(jmvcore::Image$new(
1420-
options=options,
1421-
name="extrapolationPlot",
1422-
title="Survival Extrapolation Plot",
1423-
width=600,
1424-
height=450,
1425-
renderFun=".plotExtrapolation",
1426-
requiresData=TRUE,
1427-
visible="(use_parametric && parametric_extrapolation)",
1428-
clearWith=list(
1429-
"use_parametric",
1430-
"parametric_extrapolation",
1431-
"extrapolation_time",
1432-
"parametric_distribution",
1433-
"explanatory",
1434-
"outcome")))
1435-
self$add(jmvcore::Table$new(
1436-
options=options,
1437-
name="extrapolationTable",
1438-
title="Extrapolated Survival Estimates",
1439-
visible="(use_parametric && parametric_extrapolation)",
1440-
rows=0,
1441-
columns=list(
1442-
list(
1443-
`name`="time",
1444-
`title`="Time",
1445-
`type`="number",
1446-
`format`="zto"),
1447-
list(
1448-
`name`="survival",
1449-
`title`="Survival",
1450-
`type`="number",
1451-
`format`="proportion"),
1452-
list(
1453-
`name`="ci_lower",
1454-
`title`="Lower",
1455-
`superTitle`="95% CI",
1456-
`type`="number",
1457-
`format`="proportion"),
1458-
list(
1459-
`name`="ci_upper",
1460-
`title`="Upper",
1461-
`superTitle`="95% CI",
1462-
`type`="number",
1463-
`format`="proportion")),
1464-
clearWith=list(
1465-
"use_parametric",
1466-
"parametric_extrapolation",
1467-
"extrapolation_time",
1468-
"parametric_distribution",
1469-
"explanatory",
1470-
"outcome")))
1471-
self$add(jmvcore::Html$new(
1472-
options=options,
1473-
name="parametricModelsExplanation",
1474-
title="Understanding Parametric Survival Models",
1475-
visible="(use_parametric && showExplanations)",
1476-
clearWith=list(
1477-
"use_parametric",
1478-
"parametric_distribution",
1479-
"explanatory",
1480-
"outcome")))
14811290
self$add(jmvcore::Html$new(
14821291
options=options,
14831292
name="clinicalGlossaryExplanation",
@@ -1668,14 +1477,6 @@ survivalBase <- if (requireNamespace("jmvcore", quietly=TRUE)) R6::R6Class(
16681477
#' \code{results$residualsPlot} \tab \tab \tab \tab \tab an image \cr
16691478
#' \code{results$calculatedtime} \tab \tab \tab \tab \tab an output \cr
16701479
#' \code{results$outcomeredefined} \tab \tab \tab \tab \tab an output \cr
1671-
#' \code{results$parametricModelComparison} \tab \tab \tab \tab \tab a table \cr
1672-
#' \code{results$parametricModelSummary} \tab \tab \tab \tab \tab a table \cr
1673-
#' \code{results$parametricDiagnostics} \tab \tab \tab \tab \tab a html \cr
1674-
#' \code{results$parametricSurvivalPlot} \tab \tab \tab \tab \tab an image \cr
1675-
#' \code{results$hazardFunctionPlot} \tab \tab \tab \tab \tab an image \cr
1676-
#' \code{results$extrapolationPlot} \tab \tab \tab \tab \tab an image \cr
1677-
#' \code{results$extrapolationTable} \tab \tab \tab \tab \tab a table \cr
1678-
#' \code{results$parametricModelsExplanation} \tab \tab \tab \tab \tab a html \cr
16791480
#' \code{results$clinicalGlossaryExplanation} \tab \tab \tab \tab \tab a html \cr
16801481
#' \code{results$clinicalInterpretationExplanation} \tab \tab \tab \tab \tab a html \cr
16811482
#' \code{results$copyReadySentencesExplanation} \tab \tab \tab \tab \tab a html \cr

‎jamovi/0000.yaml‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
---
22
title: Survival Module of ClinicoPath for jamovi
33
name: jsurvival
4-
version: 0.0.32.61
4+
version: 0.0.32.62
55
jms: '1.0'
66
authors:
77
- Serdar Balci

0 commit comments

Comments
 (0)