## Not run:
# library(pathClass)
# data(example_data)
# matched <- matchMatrices(x=x, adjacency=adjacency.matrix, mapping=mapping)
# ad.list <- as.adjacencyList(matched$adjacency)
# fit = fit.networkBasedSVM(matched$x[1:5,], y[1:5], DEBUG=TRUE, adjacencyList=ad.list,
# lambdas=10^(-1:2), sd.cutoff=50)
# predict(fit, newdata=matched$x[6:10,])
# ## End(Not run)
Run the code above in your browser using DataLab