R Under development (unstable) (2020-04-30 r78337) -- "Unsuffered Consequences" Copyright (C) 2020 The R Foundation for Statistical Computing Platform: x86_64-pc-linux-gnu (64-bit) R is free software and comes with ABSOLUTELY NO WARRANTY. You are welcome to redistribute it under certain conditions. Type 'license()' or 'licence()' for distribution details. Natural language support but running in an English locale R is a collaborative project with many contributors. Type 'contributors()' for more information and 'citation()' on how to cite R or R packages in publications. Type 'demo()' for some demos, 'help()' for on-line help, or 'help.start()' for an HTML browser interface to help. Type 'q()' to quit R. > pkgname <- "gnmf" > source(file.path(R.home("share"), "R", "examples-header.R")) > options(warn = 1) > library('gnmf') > > base::assign(".oldSearch", base::search(), pos = 'CheckExEnv') > base::assign(".old_wd", base::getwd(), pos = 'CheckExEnv') > cleanEx() > nameEx("V") > ### * V > > flush(stderr()); flush(stdout()) > > ### Name: V > ### Title: Example 50 x 10 matrix > ### Aliases: V > ### Keywords: datasets > > ### ** Examples > > data(V) > > > > cleanEx() > nameEx("gnmf-package") > ### * gnmf-package > > flush(stderr()); flush(stdout()) > > ### Name: gnmf-package > ### Title: Generalized non-negative matrix factorization based on Renyi > ### Divergence > ### Aliases: gnmf-package > ### Keywords: package > > ### ** Examples > > data(V) > > > > > cleanEx() > nameEx("gnmf") > ### * gnmf > > flush(stderr()); flush(stdout()) > > ### Name: gnmf > ### Title: Generalized non-negative matrix factorization based on Renyi > ### Divergence > ### Aliases: gnmf > ### Keywords: Clustering Multivariate Techniques > > ### ** Examples > > # Load sample data. > data(V) > > # Compute NMF with 20 repeats. > result <- gnmf(V,scheme="KL") Simulation.cpp:89:17: runtime error: load of value 190, which is not a valid value for type 'bool' #0 0x7fc80d187bef in Simulation::Run_KL() /data/gannet/ripley/R/packages/tests-gcc-SAN/gnmf/src/Simulation.cpp:89 #1 0x7fc80d35c7a4 in JobHandler::Run(int, double) /data/gannet/ripley/R/packages/tests-gcc-SAN/gnmf/src/JobHandler.cpp:747 #2 0x7fc80d35cdc0 in JobHandler::Run() /data/gannet/ripley/R/packages/tests-gcc-SAN/gnmf/src/JobHandler.cpp:723 #3 0x7fc80d3948d8 in CppWrapper(double*, int*, int*, char**, int*, int*, int*, int*, char**, char**, char**, char**, char**, double*, int*, char**, int*, double*, double*, double*, double*, double*, double*, double*, double*, double*) /data/gannet/ripley/R/packages/tests-gcc-SAN/gnmf/src/RInterface.cc:93 #4 0x588e6c in do_dotCode /data/gannet/ripley/R/svn/R-devel/src/main/dotcode.c:1866 #5 0x61d111 in bcEval /data/gannet/ripley/R/svn/R-devel/src/main/eval.c:7097 #6 0x669ebf in Rf_eval /data/gannet/ripley/R/svn/R-devel/src/main/eval.c:723 #7 0x66f355 in R_execClosure /data/gannet/ripley/R/svn/R-devel/src/main/eval.c:1888 #8 0x671a74 in Rf_applyClosure /data/gannet/ripley/R/svn/R-devel/src/main/eval.c:1814 #9 0x66a308 in Rf_eval /data/gannet/ripley/R/svn/R-devel/src/main/eval.c:846 #10 0x677d51 in do_set /data/gannet/ripley/R/svn/R-devel/src/main/eval.c:2960 #11 0x66a7fc in Rf_eval /data/gannet/ripley/R/svn/R-devel/src/main/eval.c:798 #12 0x6e8cdd in Rf_ReplIteration /data/gannet/ripley/R/svn/R-devel/src/main/main.c:264 #13 0x6e8cdd in Rf_ReplIteration /data/gannet/ripley/R/svn/R-devel/src/main/main.c:200 #14 0x6e93d8 in R_ReplConsole /data/gannet/ripley/R/svn/R-devel/src/main/main.c:314 #15 0x6e9524 in run_Rmainloop /data/gannet/ripley/R/svn/R-devel/src/main/main.c:1113 #16 0x419388 in main /data/gannet/ripley/R/svn/R-devel/src/main/Rmain.c:29 #17 0x7fc81df97f42 in __libc_start_main (/lib64/libc.so.6+0x23f42) #18 0x41bacd in _start (/data/gannet/ripley/R/gcc-SAN/bin/exec/R+0x41bacd) Simulation.cpp:91:14: runtime error: reference binding to null pointer of type 'const struct ClustDataSet' #0 0x7fc80d3a5a3a in Simulation::Run_KL() /data/gannet/ripley/R/packages/tests-gcc-SAN/gnmf/src/Simulation.cpp:91 #1 0x7fc80d35c7a4 in JobHandler::Run(int, double) /data/gannet/ripley/R/packages/tests-gcc-SAN/gnmf/src/JobHandler.cpp:747 #2 0x7fc80d35cdc0 in JobHandler::Run() /data/gannet/ripley/R/packages/tests-gcc-SAN/gnmf/src/JobHandler.cpp:723 #3 0x7fc80d3948d8 in CppWrapper(double*, int*, int*, char**, int*, int*, int*, int*, char**, char**, char**, char**, char**, double*, int*, char**, int*, double*, double*, double*, double*, double*, double*, double*, double*, double*) /data/gannet/ripley/R/packages/tests-gcc-SAN/gnmf/src/RInterface.cc:93 #4 0x588e6c in do_dotCode /data/gannet/ripley/R/svn/R-devel/src/main/dotcode.c:1866 #5 0x61d111 in bcEval /data/gannet/ripley/R/svn/R-devel/src/main/eval.c:7097 #6 0x669ebf in Rf_eval /data/gannet/ripley/R/svn/R-devel/src/main/eval.c:723 #7 0x66f355 in R_execClosure /data/gannet/ripley/R/svn/R-devel/src/main/eval.c:1888 #8 0x671a74 in Rf_applyClosure /data/gannet/ripley/R/svn/R-devel/src/main/eval.c:1814 #9 0x66a308 in Rf_eval /data/gannet/ripley/R/svn/R-devel/src/main/eval.c:846 #10 0x677d51 in do_set /data/gannet/ripley/R/svn/R-devel/src/main/eval.c:2960 #11 0x66a7fc in Rf_eval /data/gannet/ripley/R/svn/R-devel/src/main/eval.c:798 #12 0x6e8cdd in Rf_ReplIteration /data/gannet/ripley/R/svn/R-devel/src/main/main.c:264 #13 0x6e8cdd in Rf_ReplIteration /data/gannet/ripley/R/svn/R-devel/src/main/main.c:200 #14 0x6e93d8 in R_ReplConsole /data/gannet/ripley/R/svn/R-devel/src/main/main.c:314 #15 0x6e9524 in run_Rmainloop /data/gannet/ripley/R/svn/R-devel/src/main/main.c:1113 #16 0x419388 in main /data/gannet/ripley/R/svn/R-devel/src/main/Rmain.c:29 #17 0x7fc81df97f42 in __libc_start_main (/lib64/libc.so.6+0x23f42) #18 0x41bacd in _start (/data/gannet/ripley/R/gcc-SAN/bin/exec/R+0x41bacd) > > # Extract H and W from the result. > # H and W are lists, each containing the result of 20 repeats. > H <- result$H > W <- result$W > > # Get the H and W matrices of the first repeat. > H1 <- H[[1]] > W1 <- W[[1]] > > > > ### *