El vector que representa los puntos de soporte es...
el s(1,3.5,5,10) que hace referencia al tiempo en horas
el B(10,20,35.33,35.5) que hace referencia a la concentración en g/mL
el s(1,3.5,5,10) que hace referencia al tiempo en días
el B(10,20,35.33,35.5) que hace referencia a la concentración en g/L
La variable dependiente es...
la concentración en g/L
el tiempo en días
la concentración en g/mL
el tiempo en horas
EL orden que Arturo nos recomienda seguir a la hora de realizar cualquier programa es: 1º. Funciones Datos Variables( Funciones, Datos, Variables ) 2º. Datos Funciones Llamada a los datos( Datos, Funciones, Llamada a los datos ) 3º. Llamadas a las funciones Funciones Datos Llamadas a los datos( Llamadas a las funciones, Funciones, Datos, Llamadas a los datos )
Si realizásemos un algoritmo para este ejercicio ¿cuáles serían las variable conocidas que deberíamos introducir?
s, t, m, b
s, n, t
n, s, t, B
B, s
Supongamos que para definir por primera vez Polbase escribimos: Polbase<-function(s,t,n) Esta expresión es correcta incorrecta imposible( correcta, incorrecta, imposible ) ya que al ser la primera vez, el orden de las variables dentro de la función sí no a veces( sí, no, a veces ) puede ser cualquiera. Sin embargo, no es necesario es necesario da igual( no es necesario, es necesario, da igual ) respetar este orden de variables que establecemos dentro de la función cada vez que la reescribamos a lo largo del programa.
La operación que debemos escribir en R para hallar L es...
L[i]=L[i] · (t-s[j])/(s[i]-s[j])
L=L[i] * (t-s[j])/(s[i]-s[j])
L[i]= L[i] * (t-s[j])/(s[i]-s[j])
L[i]=L[i] * t-s[j]/(s[i]-s[j])
Antes de ❌ el bucle abierto para ❌, debemos escribir ❌. Esto es necesario porque así indicamos lo que queremos que salga de la función como ❌.
Para crear el polinomio interpolador de Lagrange de acuerdo a la fórmula "p igual a sumatorio con i variando desde 1 hasta n de B[i] por L[i]" debemos escribir: p=0 1 10 4( 0, 1, 10, 4 ) for(i in 1,n 1:n 1->n( 1,n, 1:n, 1->n )){ p=L[i] B[i] p p[i]( L[i], B[i], p, p[i] )+L[i]*B[i] p*L[i] p*B[i] L[i]*B( L[i]*B[i], p*L[i], p*B[i], L[i]*B ) }
Posteriormente Arturo nos pide dibujar una gráfica del polinomio interpolador. Para ello debemos generar 1001 puntos equidistantes entre s[1] y . Así, escribimos: x=(s[1],s[n],=1001) donde sirve para establecer el número de puntos consecutivos en el intervalo entre y s[n]. Si quisiéramos elegir la distancia entre cada dos puntos consecutivos, esta se debería poner en la componente del vector seq()
Al hacer el dibujo de la gráfica, que va a combinar una función dos funciones cuatro funciones( una función, dos funciones, cuatro funciones ) no podemos olvidarnos de su color ajustarlas la forma de la línea( su color, ajustarlas, la forma de la línea ) para que ambas tengan la misma escala apariencia forma de línea( escala, apariencia, forma de línea ) y no la que R pone por defecto ya que sino, el polinomio interpolador que aparecería dibujado no pasaría (por ejemplo) por los puntos de soporte puntos del eje mínimos cuadrados( puntos de soporte, puntos del eje, mínimos cuadrados ).
