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.6666667 0.1666667 0.1666667
## [2,] 0.1666667 0.6666667 0.1666667
## [3,] 0.1666667 0.1666667 0.6666667
smoothing(x, 0.1)
## [,1] [,2] [,3]
## [1,] 0.93333333 0.03333333 0.03333333
## [2,] 0.03333333 0.93333333 0.03333333
## [3,] 0.03333333 0.03333333 0.93333333