The function smoothing
builds a smoothing matrix
for using in Nonsmooth NMF models.
smoothing(x, theta = x@theta, ...)
NMFns
.if x
estimates a r
-rank NMF, then the result
is a r \times r
square matrix.
For a r
-rank NMF, the smoothing matrix of parameter
\theta
is built as follows:
S = (1-\theta)I + \frac{\theta}{r} 11^T , whereI
is the identity matrix and1
is a vector of ones (cf.NMFns-class
for more details).
x <- nmfModel(3, model='NMFns')
smoothing(x)
## [,1] [,2] [,3]
## [1,] 0.6667 0.1667 0.1667
## [2,] 0.1667 0.6667 0.1667
## [3,] 0.1667 0.1667 0.6667
smoothing(x, 0.1)
## [,1] [,2] [,3]
## [1,] 0.93333 0.03333 0.03333
## [2,] 0.03333 0.93333 0.03333
## [3,] 0.03333 0.03333 0.93333