Add function last_reservoir_state() which computes the
reservoir states for a given set of input sequences and extracts the
final state of the reservoir for each sequence.
library(reservoirnet)
node <- reservoirnet::createNode("Reservoir", units = 100,
lr=0.1, sr=0.9,
seed = 1)
# Example input sequences
X <- list(matrix(runif(100), ncol = 1), matrix(runif(200), ncol = 1))
last_states <- last_reservoir_state(node, X)
print(last_states)
Need a high-speed mirror for your open-source project?
Contact our mirror admin team at info@clientvps.com.
This archive is provided as a free public service to the community.
Proudly supported by infrastructure from VPSPulse , RxServers , BuyNumber , UnitVPS , OffshoreName and secure payment technology by ArionPay.