R/getWSList.R

Defines functions `getWSList`

`getWSList` <-
function(S, WList, tt) {
  SList <- vector("list", length=length(WList))
  for(j in 1:length(WList)) 
    SList[[j]] <-  t(S * WList[[j]][tt,])
  SList 
}

Try the ALS package in your browser

Any scripts or data that you put into this service are public.

ALS documentation built on Aug. 25, 2022, 9:09 a.m.