Created append_ott_id.R, updated calculate_PD.R and workflow.R

[LBreugelmans]

• function to append ott-ids to cube as seperate function
• cleaned up workflow script
• written out calculate_PD.R to calculate PD from scratch