From dbc1f76336355963437cc9a6c21cf175669d3f5a Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Klervie=20Tocz=C3=A9?= <klervie.tocze@liu.se> Date: Tue, 14 Jan 2025 17:28:12 +0100 Subject: [PATCH] Fixing issue with too long file name in the R script --- Analysis/evaluationCurvesAndAnalysis.R | 6 +++--- ...d_UtilizationDifferent_40rep_dov_2fi_Std10_rdRandom.csv} | 0 2 files changed, 3 insertions(+), 3 deletions(-) rename Results/RandomBeginningDevice/Std10/{resultsParsed_UtilizationDifferent_40rep_DeviceOnlyVar_2replicas_Std10_RequestDeviceRandom.csv => resultsParsed_UtilizationDifferent_40rep_dov_2fi_Std10_rdRandom.csv} (100%) diff --git a/Analysis/evaluationCurvesAndAnalysis.R b/Analysis/evaluationCurvesAndAnalysis.R index fb5c250..4cb2ac0 100644 --- a/Analysis/evaluationCurvesAndAnalysis.R +++ b/Analysis/evaluationCurvesAndAnalysis.R @@ -1426,7 +1426,7 @@ ggplot(data=statisticsPlacement_m, aes(x=factor(datadiffloc), y=datareldiff_m)) #Average included device utilization data graph ####Begin ### Getting the data - different placements ONLY -result_data_csv <- read.csv(file="./RandomBeginningDevice/Std10/resultsParsed_UtilizationDifferent_40rep_DeviceOnlyVar_2replicas_Std10_RequestDeviceRandom.csv", header=TRUE, sep=",") +result_data_csv <- read.csv(file="./RandomBeginningDevice/Std10/resultsParsed_UtilizationDifferent_40rep_dov_2fi_Std10_rdRandom.csv", header=TRUE, sep=",") #Adding the load level column result_data_csv$LoadLevel <- result_data_csv$Scenario*10 @@ -1460,7 +1460,7 @@ ggplot(data=mean_data_utilization, aes(x=factor(result_data_csv$LoadLevel), y=me #Completion Time graph for different placements ####Begin ## Getting the data - different placements ONLY -result_data_csv_ut_DifferentOnly <- read.csv(file="./RandomBeginningDevice/Std10/resultsParsed_UtilizationDifferent_40rep_DeviceOnlyVar_2replicas_Std10_RequestDeviceRandom.csv", header=TRUE, sep=",") +result_data_csv_ut_DifferentOnly <- read.csv(file="./RandomBeginningDevice/Std10/resultsParsed_UtilizationDifferent_40rep_dov_2fi_Std10_rdRandom.csv", header=TRUE, sep=",") ## Getting the data - all placements result_data_csv_ev_All <- read.csv(file="./RandomBeginningDevice/Std10/resultsParsed_40rep_DeviceOnlyVar_2replicas_Std10_RequestDeviceRandom.csv", header=TRUE, sep=",") result_data_csv_ev_All$LoadLevel <- result_data_csv_ev_All$Scenario*10 @@ -1797,7 +1797,7 @@ ggplot(data=mean_data_utilization, aes(x=factor(result_data_csv$LoadLevel), y=me #Completion Time graph for different placements ####Begin ## Getting the data - different placements ONLY -result_data_csv_ut_DifferentOnly <- read.csv(file="./4fi/RandomBeginningDevice/resultsParsed_UtilizationDifferent_40rep_DeviceOnlyVar_4replicas_Std10_RequestDeviceRandom.csv", header=TRUE, sep=",") +result_data_csv_ut_DifferentOnly <- read.csv(file="./RandomBeginningDevice/4fi/resultsParsed_UtilizationDifferent_40rep_DeviceOnlyVar_4replicas_Std10_RequestDeviceRandom.csv", header=TRUE, sep=",") ## Getting the data - all placements result_data_csv_ev_All <- read.csv(file="./RandomBeginningDevice/4fi/resultsParsed_40rep_DeviceOnlyVar_4replicas_Std10_RequestDeviceRandom.csv", header=TRUE, sep=",") result_data_csv_ev_All$LoadLevel <- result_data_csv_ev_All$Scenario*10 diff --git a/Results/RandomBeginningDevice/Std10/resultsParsed_UtilizationDifferent_40rep_DeviceOnlyVar_2replicas_Std10_RequestDeviceRandom.csv b/Results/RandomBeginningDevice/Std10/resultsParsed_UtilizationDifferent_40rep_dov_2fi_Std10_rdRandom.csv similarity index 100% rename from Results/RandomBeginningDevice/Std10/resultsParsed_UtilizationDifferent_40rep_DeviceOnlyVar_2replicas_Std10_RequestDeviceRandom.csv rename to Results/RandomBeginningDevice/Std10/resultsParsed_UtilizationDifferent_40rep_dov_2fi_Std10_rdRandom.csv -- GitLab