Produces a summary of an nmfkc object, including matrix dimensions,
runtime, fit statistics, and diagnostics.
Usage
# S3 method for class 'nmfkc'
summary(object, ...)Examples
Y <- matrix(cars$dist, nrow = 1)
A <- rbind(1, cars$speed)
result <- nmfkc(Y, A, rank = 1)
#> Y(1,50)~X(1,1)C(1,2)A(2,50)=XB(1,50)...
#> 0sec
summary(result)
#>
#> Call:
#> nmfkc(Y = Y, A = A, rank = 1)
#>
#> Dimensions: Y(1,50)~X(1,1)C(1,2)A(2,50)=XB(1,50)
#> Rank (Q): 1
#> Runtime: 0sec
#> Method: EU
#> Iterations: 58
#> Missing: 0 (0.0%)
#>
#> Statistics:
#> Objective function: 12982
#> Multiple R-squared: 0.6511
#> Residual Std Error: 16.17
#> Mean Absolute Error: 12.71
#> ICp: 5.559
#>
#> Structure Diagnostics:
#> Basis (X) Sparsity: 0.0% (< 1e-4)
#> Coef (B) Sparsity: 0.0% (< 1e-4)
#> Clustering Entropy: 0 (range: 0-1, closer to 0 is better)
#> Clustering Crispness: 1 (range: 0-1, closer to 1 is better)
#>