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

feat: Add AI Surrogate functions to V.03

Browse Source
This commit is contained in:
hans 2024-05-27 15:22:29 +02:00
parent 95cb95998e
commit 53b9479cad
3 changed files with 1 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
bench/barite/barite_200ai_surrogate_input_script.R
View File

@ -38,7 +38,7 @@ mass_balance <- function(predictors, prediction) {
}
validate_predictions <- function(predictors, prediction) {
epsilon <- 0.00003
epsilon <- 0.000000003
mb <- mass_balance(predictors, prediction)
msgm("Mass balance mean:", mean(mb))
msgm("Mass balance variance:", var(mb))

1
src/CMakeLists.txt
View File

@ -83,4 +83,3 @@ target_link_libraries(poet_init PRIVATE POETLib RRuntime)
target_include_directories(poet_init PRIVATE "${CMAKE_CURRENT_BINARY_DIR}")
install(TARGETS poet poet_init DESTINATION bin)

6
src/poet.cpp
View File

@ -289,9 +289,6 @@ static Rcpp::List RunMasterLoop(RInsidePOET &R, const RuntimeParameters &params,
// Predict
R.parseEval("predictors_scaled <- preprocess(predictors)");
R.parseEval("print('PREDICTORS:')");
R.parseEval("print(head(predictors))");
R.parseEval("prediction <- preprocess(prediction_step(model, predictors_scaled),\
backtransform = TRUE,\
outputs = TRUE)");
@ -327,9 +324,6 @@ static Rcpp::List RunMasterLoop(RInsidePOET &R, const RuntimeParameters &params,
// TODO: Check how to get the correct columns
R.parseEval("target_scaled <- preprocess(targets, outputs = TRUE)");
R.parseEval("print('TARGET:')");
R.parseEval("print(head(target_scaled))");
R.parseEval("training_step(model, predictors_scaled, target_scaled, validity_vector)");
double ai_end_t = MPI_Wtime();