From the given problem what I can interpret is that you want a vector output for t ranging from 1 to 5.
A doubt, will Tave and A changes in each iteration or remain constant?
EDP <- function(t, Tave, A) {
Soil <- SST(t, Tave, A) # don't know about these functions
B <- Energy(Soil) ##
C <- DevRate(Soil) ##
D <- paste(Tave,Soil,B,C) # Single value which will be returned as character
return(D)
}
IncenerDev <- vector()
for (t in 1:5) {
result = vector() # Sorry, it should be result not a
Day <- (t * 24)
Tavetracker <- Tave + 1
Tave <- Tave + 1 # iterating Tave
Atracker <- A + 1
A <- A + 1 # iterating A also
result <- EDP(t, Tave, ATracker)
IncenerDev <- rbind(IncenerDev,a)
}
Output format
[1] "2, 5, 5J, 0.05%" "3, 8, 8J, 0.08%" "4, 11, 11J, 0.11%" "5, 14, 14J, 0.14%"
[5] "6, 17, 17J, 0.17%"
#Just added "J" in B and "%" in C
is this helpful?