a)registrar 2 productos b)imprimirlos. c)definir el precio de venta de cada uno d)definir la cantidad vendida de cada uno e)mostar en pantalla la compra total despues de obtener un 3% de descuento sobre el valor de la compra

a <- c("jabon","jamon")
b <- c("$5","$10")
ab <- data.frame(a,b)
ab
e <- 0.93
ab$b <- 0.93*ab$b
ab
ab$b
sum(ab$b)