R function to compute European price option using Black Scholes Formula.