max/poet
1
0
Fork 0
mirror of https://git.gfz-potsdam.de/naaice/poet.git synced 2025-12-16 12:54:50 +01:00
Code Issues Packages Projects Releases Wiki Activity

Add file extension replacement and print output filename

Browse Source
This commit is contained in:
Max Luebke 2024-04-03 21:19:39 +00:00
parent 320ae7a6f0
commit ec2dff0be1
1 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/initializer.cpp
View File

@ -6,6 +6,7 @@
#include <RInside.h> #include <RInside.h>
#include <Rcpp.h> #include <Rcpp.h>
#include <iostream>
int main(int argc, char **argv) { int main(int argc, char **argv) {
if (argc < 2 || argc > 2) { if (argc < 2 || argc > 2) {
@ -32,9 +33,14 @@ int main(int argc, char **argv) {
init.initializeFromList(setup); init.initializeFromList(setup);
Rcpp::Function save("saveRDS"); // replace file extension by .rds
const std::string rds_out_filename =
script.substr(0, script.find_last_of('.')) + ".rds";
save(init.exportList(), "init.rds"); Rcpp::Function save("saveRDS");
save(init.exportList(), Rcpp::wrap(rds_out_filename));
std::cout << "Saved result to " << rds_out_filename << std::endl;
// parseGrid(R, grid, results); // parseGrid(R, grid, results);
return EXIT_SUCCESS; return EXIT_SUCCESS;