intial power curve code from mathangi
adding libraries
adding reshape and ggplot spagetti code