Autor Tema: Gráficos Mathematica

0 Usuarios y 1 Visitante están viendo este tema.

17 Enero, 2021, 02:57 pm
Leído 814 veces

Quema

  • $$\Large \color{#5b61b3}\pi\,\pi\,\pi\,\pi\,\pi$$
  • Mensajes: 1,765
  • País: uy
  • Karma: +0/-0
  • Sexo: Masculino
Quiero graficar varias funciones, identificándolo por la traza, no por el color, pero me da error, o me grafica solamente una función.


c[x_] := (1 + x/2 - x^2)/(1 + x/2)
p2[x_] := 1 + (1 + x^2)

Show[Plot[c[x ], p2[x ], {x, 0, 1 }, PlotRange -> {0, 1}],  Plot[p2[x ], {x, 0, 1 }, PlotRange -> {0, 1}]]

Me da error, no se qué estoy haciendo mal.

Gracias

17 Enero, 2021, 03:08 pm
Respuesta #1

Carlos Ivorra

  • Administrador
  • Mensajes: 9,669
  • País: es
  • Karma: +0/-0
  • Sexo: Masculino
    • Página web personal
Quiero graficar varias funciones, identificándolo por la traza, no por el color, pero me da error, o me grafica solamente una función.

Código: [Seleccionar]
c[x_] := (1 + x/2 - x^2)/(1 + x/2)
p2[x_] := 1 + (1 + x^2)

Show[Plot[{c[x], p2[x]}, {x, 0, 1 }, PlotRange -> {0, 1}],  Plot[p2[x], {x, 0, 1 }, PlotRange -> {0, 1}]]

Me da error, no se qué estoy haciendo mal.

Gracias

Te da error porque necesitas unas llaves que abracen las dos funciones que pones en el primer Plot (las he añadido yo en la cita). Pero no entiendo lo que quieres hacer: primero pides que dibuje las dos funciones y luego solo una, pero pones un PlotRange que hace que la segunda función no se represente, porque empieza en 2 y sube.