seeding {seedCCA}

increments of iterative projections

Description

Returns increments (nFu) of iterative projections of a seed matrix onto a covariance matrix u times.)

Usage

seeding(seed, covx, n,  u=10)

Arguments

seed

numeric matrix (p * d), a seed matrix

covx

numeric matrix (p * p), covariance matrix of X

n

numeric, sample sizes

u

numeric, maximum number of projections

Value

nFu

n*Fu values

Examples

data(cookie)
myseq<-seq(141,651,by=2)
X<-as.matrix(cookie[-c(23,61),myseq])
Y<-as.matrix(cookie[-c(23,61),701:704])
seed <- cov(X,Y)
covx <- cov(X)
seeding(seed, covx, n=dim(X)[1], u=4)