T3fitpartitioning: Fit of each entity per mode
In ThreeWay: Three-Way Component Analysis

Description Usage Arguments Value Note Author(s) See Also Examples

Computation of fit contributions by combinations of modes in case of ‘renormalization’.

1	T3fitpartitioning(Xprep, n, m, p, AS, BT, CU, K, renormmode, laba, labb, labc)

`Xprep`	Matrix (or data.frame coerced to a matrix) of order (`n` `x` `mp`) containing the matricized array (frontal slices)
`n`	Number of `A`-mode entities
`m`	Number of `B`-mode entities
`p`	Number of `C`-mode entities
`AS`	Component matrix for the `A`-mode
`BT`	Component matrix for the `B`-mode
`CU`	Component matrix for the `C`-mode
`K`	Matricized core array (frontal slices)
`renormmode`	Renormalization option (0 for no renormalization, 1 for fit contribution to total fit of each `B`- and `C`-mode component combination, 2 for fit contribution to total fit of each `A`- and `C`-mode component combination, 3 for fit contribution to total fit of each `A`- and `B`-mode component combination)
`laba`	Optional vector of length `n` containing the labels of the `A`-mode entities
`labb`	Optional vector of length `m` containing the labels of the `B`-mode entities
`labc`	Optional vector of length `p` containing the labels of the `C`-mode entities

A list including the following components:

`fitA`	Fit contribution for the `A`-mode entities
`fitB`	Fit contribution for the `B`-mode entities
`fitC`	Fit contribution for the `C`-mode entities
`ABcontr`	Contribution to the goodness of fit contributions by combinations of `A`- and `B`-modes in case of ‘renormalization’
`BCcontr`	Contribution to the goodness of fit contributions by combinations of `B`- and `C`-modes in case of ‘renormalization’
`ACcontr`	Contribution to the goodness of fit contributions by combinations of `A`- and `C`-modes in case of ‘renormalization’

The computation of the fit contributions by combinations of modes is done in case of ‘renormalization’.
In Tucker1, renormmode must be equal to 0.

Maria Antonietta Del Ferraro mariaantonietta.delferraro@yahoo.it
Henk A.L. Kiers h.a.l.kiers@rug.nl
Paolo Giordani paolo.giordani@uniroma1.it

T3, T2, T1

data(Bus)
# labels for Bus data
laba <- rownames(Bus)
labb <- substr(colnames(Bus)[1:5], 1, 1)
labc <- substr(colnames(Bus)[seq(1,ncol(Bus),5)], 3, 8)
# T3 solution
BusT3 <- T3funcrep(Bus, 7, 5, 37, 2, 2, 2, 0, 1e-6)
# Fitpartitioning of the T3 solution
FitT3 <- T3fitpartitioning(Bus, 7, 5, 37, BusT3$A, BusT3$B, BusT3$C, BusT3$H, 0, 
 laba, labb, labc)
# Fitpartitioning of the T3 solution (when labels are not available)
FitT3 <- T3fitpartitioning(Bus, 7, 5, 37, BusT3$A, BusT3$B, BusT3$C, BusT3$H, 0)