Código para gráficas en wólfram
a = 10;
expr = (4 x - a) (x + 2)/(2 x + 1);
Plot[expr, {x, 0, 10},
PlotLabel -> Style[TraditionalForm[h[x] == expr], 16, Black],
PlotRange -> All, AxesOrigin -> {0, 0},
AxesLabel -> {Style["Tiempo (s)", Black], Style["Desplazamiento (mm)", Black]},
TicksStyle -> Black,
AxesStyle -> Black,
PlotStyle -> Black]
(*Definir la función*)f[t_] := Exp[-t]*Cos[t] + Log[t + 1]
(*Calcular derivadas hasta el cuarto orden*)
derivadas = Table[D[f[t], {t, n}], {n, 1, 4}]
(*Mostrar derivadas de forma bonita*)
TableForm[Table[{n, Simplify[derivadas[[n]]]}, {n, 1, 4}],
TableHeadings -> {{"1ª Derivada", "2ª Derivada", "3ª Derivada",
"4ª Derivada"}, {"Orden", "Expresión"}}]
fdfdd
sdsd
Algunos recursos educativos adicionales De wolfram
Introducción a Mathematica Online
https://www.wolfram.com/broadcast/video.php?c=362&v=1220
Una Introducción Elemental a Wolfram Language:
https://www.wolfram.com/language/elementary-introduction/2nd-ed/index.html.es
Introducción Rápida a Mathematica y Wolfram Language para estudiantes de Matemáticas:
https://www.wolfram.com/language/fast-introduction-for-math-students/es/
Introducción Rápida a Mathematica y Wolfram Language para programadores:
https://www.wolfram.com/language/fast-introduction-for-programmers/es/
Repositorio Wolfram de Objetos de Aprendizaje dinámicos
https://www.wolfram.com/education/new-normal-of-education/
Cursos gratuitos en Wolfram U:
https://www.wolfram.com/wolfram-u/
Direcciones: dibujos con Desmos
https://www.facebook.com/MateduCinvestav/ Matemáticas México
https://www.youtube.com/channel/UC24vBb-_R5EJrF9Tq2qsCYQ/videos
Cursos gratuitos de grupo "fundapromat" en matemáticas https://fundapromat.org/
publicada desde 15 de enero 2005