Print Method for DPprior_fit Objects
print.DPprior_fit.RdPrints the canonical schema, mode, method, decision fields, target, and available candidate evidence. Migrated or failed objects without a public candidate are labelled explicitly rather than exposing quarantined values.
Usage
# S3 method for class 'DPprior_fit'
print(x, digits = 4, ...)Details
The method first validates the complete dpprior.result/1
object. Printed convergence language is derived from status,
usable, and verified; compatibility aliases and optimizer exit
codes are never treated as verification.
Examples
# Create a fit object
fit <- DPprior_fit(J = 50, mu_K = 5, var_K = 8)
print(fit)
#> DPprior Prior Elicitation Result
#> =============================================
#>
#> Schema: dpprior.result/1
#> Method: A2-MN (mode: a2_moment)
#> Status: converged; usable: yes; verified: yes
#>
#> Target (J = 50):
#> E[K_J] = 5.0000
#> Var(K_J) = 8.0000
#>
#> Canonical candidate:
#> alpha ~ Gamma(a = 2.0361, b = 1.6051)
#> Achieved E[K_J] = 5.000000; Var(K_J) = 8.000000
#> Maximum absolute moment residual = 1.89e-12
#>
#> Canonical guidance: scaled component residuals and independent higher-order verification passed
# With custom digits
print(fit, digits = 6)
#> DPprior Prior Elicitation Result
#> =============================================
#>
#> Schema: dpprior.result/1
#> Method: A2-MN (mode: a2_moment)
#> Status: converged; usable: yes; verified: yes
#>
#> Target (J = 50):
#> E[K_J] = 5.0000
#> Var(K_J) = 8.0000
#>
#> Canonical candidate:
#> alpha ~ Gamma(a = 2.036093, b = 1.605054)
#> Achieved E[K_J] = 5.00000000; Var(K_J) = 8.00000000
#> Maximum absolute moment residual = 1.89e-12
#>
#> Canonical guidance: scaled component residuals and independent higher-order verification passed