Hola.
Tengo que programar dicho polinomio en Mathematica y hallarlo para y grado 2. El caso es que yo hago:
Bernstein[n_, f[ x ] _, x_] = Sum[Binomial[n,k] x^k (1-x)^(n-k) f[k/n], {k,0,n}];
Bernstein[2, e^(x^2),x]
Y la función me devuelve lo mismo que le pregunto. La parte de la derecha no puede estar mal porque es el código, así que mi fallo está a la hora de declarar las variables. Le he dado muchas vueltas y lo he cambiado de todas las formas que he podido, pero nada. ¿Cómo las declaro entonces para que me salgan?
Saludos y muchas gracias.
- - - Actualizado - - -
Al final ya lo he entendido.
Un saludo.
Tengo que programar dicho polinomio en Mathematica y hallarlo para y grado 2. El caso es que yo hago:
Bernstein[n_, f[ x ] _, x_] = Sum[Binomial[n,k] x^k (1-x)^(n-k) f[k/n], {k,0,n}];
Bernstein[2, e^(x^2),x]
Y la función me devuelve lo mismo que le pregunto. La parte de la derecha no puede estar mal porque es el código, así que mi fallo está a la hora de declarar las variables. Le he dado muchas vueltas y lo he cambiado de todas las formas que he podido, pero nada. ¿Cómo las declaro entonces para que me salgan?
Saludos y muchas gracias.
- - - Actualizado - - -
Al final ya lo he entendido.
Un saludo.