You signed in with another tab or window. Reload to refresh your session.You signed out in another tab or window. Reload to refresh your session.You switched accounts on another tab or window. Reload to refresh your session.Dismiss alert
Create function to show which files are being pulled for observed data - right now this functionality is within the import_observed_data.R, but the function does not return a specific list of the pathnames.
#loop through each of the Formatted Unsteady Flow Files pathnames and pull the files out of dss
for(p in 1:length(plan_events)){
Formatted_UnsteadyFlowFile <- Formatted_UnsteadyFlowFileList[[p]]
event_year <- plan_events[p]
#Recreate the paths for those DSS files
Observed_Pathnames_Formatted <-c()
for(j in 1:nrow(Formatted_UnsteadyFlowFile)){ #for each row in the data frame
Formmated_Pathname <- paste0("/",Formatted_UnsteadyFlowFile[j,4],"/",
Formatted_UnsteadyFlowFile[j,5],"/",
Formatted_UnsteadyFlowFile[j,6],"/",
"/",
Formatted_UnsteadyFlowFile[j,8],"/",
Formatted_UnsteadyFlowFile[j,9],"/")
Observed_Pathnames_Formatted <- c(Observed_Pathnames_Formatted , Formmated_Pathname)
}
assign(paste("Observed_Pathnames_Formatted",Plan_Event, sep="_") ,Observed_Pathnames_Formatted)
The text was updated successfully, but these errors were encountered:
Create function to show which files are being pulled for observed data - right now this functionality is within the import_observed_data.R, but the function does not return a specific list of the pathnames.
#loop through each of the Formatted Unsteady Flow Files pathnames and pull the files out of dss
for(p in 1:length(plan_events)){
Formatted_UnsteadyFlowFile <- Formatted_UnsteadyFlowFileList[[p]]
event_year <- plan_events[p]
The text was updated successfully, but these errors were encountered: