Re: PlotVectorField

["Hajo Spitzer" <hjspitzer@XXXXXXX.de>]

Hallo,

man könnte nehmem :

Show[PlotVectorField[{x, 0}, {x, -2, 2}, {
      y, -2, 2}, PlotPoints -> {5, 5}, Frame -> True,
        PlotRange -> {{-4, 4}, {-4, 4}}, DisplayFunction ->
          Identity] /. Arrow[x_, y_, __] -> {
      Hue[((x - y).(x - y))],
        Line[{x, y}]}, DisplayFunction -> $DisplayFunction]

Hierbei kann die Farbe und die Länge der Linie nach eigenem Geschmack
abgeändert werden



Gruss

Hajo Spitzer

----- Original Message ----- 
From: "Schlosser Reinhard, Prof. Dr." <reinhard.schlosser@XXXXXXX.de>
To: <dmug@XXXXXXX.ch>
Sent: Tuesday, August 05, 2003 4:36 PM
Subject: PlotVectorField


> Mit PlotVectorField möchte ich näherungsweise Feldlinien darstellen.
>
> Die Schrittweite in x- bzw. y-Richtung sei konstant und gleich.
>
> Nun soll jeder Vektor so skaliert werden, daß seine Länge der Schrittweite
d
> entspricht.
>
> Den Betrag des Vektors möchte ich mittels ColorFunction darstellen lassen.
>
> Pfeilspitzen sollen nicht dargestellt werden.
>
> Ich habe versucht die Länge mit ScaleFunction zu beeinflussen,
>
> erhalte aber nicht das gewünschte Ergebnis.
>
> Wie muß ich folgendes triviales Beispiel
>
>
PlotVectorField[{x,0},{x,-2,2},{y,-2,2},PlotPoints\[Rule]{5,5},Frame->True,P
> lotRange\[Rule]{{-4,4},{-4,4}}];
>
> ergänzen, um das gewünschte Ergebnis zu erhalten.
>
>
> Mit freundlichen Gruessen / Best Regards
> Prof. Dr.-Ing. Reinhard Schlosser
>
> Fachhochschule Deggendorf
> Fachbereich Elektrotechnik und Medientechnik
> Edlmairstrasse 6 + 8
> 94469 Deggendorf
> Tel 0991-3615-515
> Fax 0991-3615-599
> reinhard.schlosser@XXXXXXX.de
> http://www.fh-deggendorf.de
>
>