www.matheraum.de
Das Matheforum.
Das Matheforum des MatheRaum.

Für Schüler, Studenten, Lehrer, Mathematik-Interessierte.
Hallo Gast!einloggen | registrieren ]
Startseite · Forum · Wissen · Kurse · Mitglieder · Team · Impressum
Forenbaum
^ Forenbaum
Status Mathe
  Status Schulmathe
    Status Primarstufe
    Status Mathe Klassen 5-7
    Status Mathe Klassen 8-10
    Status Oberstufenmathe
    Status Mathe-Wettbewerbe
    Status Sonstiges
  Status Hochschulmathe
    Status Uni-Analysis
    Status Uni-Lin. Algebra
    Status Algebra+Zahlentheo.
    Status Diskrete Mathematik
    Status Fachdidaktik
    Status Finanz+Versicherung
    Status Logik+Mengenlehre
    Status Numerik
    Status Uni-Stochastik
    Status Topologie+Geometrie
    Status Uni-Sonstiges
  Status Mathe-Vorkurse
    Status Organisatorisches
    Status Schule
    Status Universität
  Status Mathe-Software
    Status Derive
    Status DynaGeo
    Status FunkyPlot
    Status GeoGebra
    Status LaTeX
    Status Maple
    Status MathCad
    Status Mathematica
    Status Matlab
    Status Maxima
    Status MuPad
    Status Taschenrechner

Gezeigt werden alle Foren bis zur Tiefe 2

Navigation
 Startseite...
 Neuerdings beta neu
 Forum...
 vorwissen...
 vorkurse...
 Werkzeuge...
 Nachhilfevermittlung beta...
 Online-Spiele beta
 Suchen
 Verein...
 Impressum
Das Projekt
Server und Internetanbindung werden durch Spenden finanziert.
Organisiert wird das Projekt von unserem Koordinatorenteam.
Hunderte Mitglieder helfen ehrenamtlich in unseren moderierten Foren.
Anbieter der Seite ist der gemeinnützige Verein "Vorhilfe.de e.V.".
Partnerseiten
Mathe-Seiten:Weitere Fächer:

Open Source FunktionenplotterFunkyPlot: Kostenloser und quelloffener Funktionenplotter für Linux und andere Betriebssysteme
StartseiteMatheForenMathematicaSelect[] korrekt verwenden
Foren für weitere Schulfächer findest Du auf www.vorhilfe.de z.B. Deutsch • Englisch • Französisch • Latein • Spanisch • Russisch • Griechisch
Forum "Mathematica" - Select[] korrekt verwenden
Select[] korrekt verwenden < Mathematica < Mathe-Software < Mathe < Vorhilfe
Ansicht: [ geschachtelt ] | ^ Forum "Mathematica"  | ^^ Alle Foren  | ^ Forenbaum  | Materialien

Select[] korrekt verwenden: Frage (beantwortet)
Status: (Frage) beantwortet Status 
Datum: 23:43 Di 29.01.2013
Autor: TruEnemy

Ich habe diese Frage in keinem Forum auf anderen Internetseiten gestellt.

Hallo! Ich habe hier in Mathematica eine Liste mit zufällig erstellen Punkten
der Form {x,y,z}. Ich will nun über Select[Liste, Kriterium] all diejenigen
Punkte herausholen, für die z>0 gilt. Ich habe schon so ziemlich alles pro-
biert aber scheitere jedes Mal. Das Kriterium sollte am besten mit einer
PureFunction erstellt sein (nein, (#>0)& oder (#3>0)& klappt nicht). Könnte
mir bitte jemand helfen? ich bin am verzweifeln. Vielen Dank und liebe Grüße.

Hier der originale Quellcode, die Frage sowie einer meiner Versuche dazu:

points = {};
For[i = 1, i <= 10000, i++, {
[mm] \[Theta] [/mm] = [mm] RandomReal[{-\[Pi], \[Pi]}]; [/mm]
[mm] \[Phi] [/mm] = RandomReal[{0, 2 [mm] \[Pi]}]; [/mm]
AppendTo[points, [mm] {Cos[\[Phi]] Sin[\[Theta]], Sin[\[Phi]] Sin[\[Theta]], Cos[\[Theta]]}]; [/mm] }]
Graphics3D[{Sphere[], {Black, PointSize[.01], Point[points]}}, Boxed -> False, ImageSize ->  200]

(a) Zeichnen Sie getrennt alle Punkte, die sich auf der Nordhalbkugel bzw. auf der Südhalbkugel befinden.
     Dazu verwenden wir am besten Select[ ] mit der entsprechenden Auswahlbedingung.

(b) Zeichnen Sie nur alle Punkte, die sich zwischen dem 30. und 50. Breitengrad befinden  ( ebenfalls mit Select[ ] ).

(c) Zeichnen Sie alle Punkte, die sich zwischen dem 80. und 120. Längengrad befinden  ( mit Select[ ] und ArcTan[x, y] ).

(a) NHK = Select[points, {pointsMB#MB3 > 0 &}]
     Graphics3D[{Sphere[], {Black, PointSize[.01], Point[NHK]}}, Boxed -> False, ImageSize ->  200]

     SHK = Select[points, {pointsMB#MB3 < 0 &}]
     Graphics3D[{Sphere[], {Black, PointSize[.01], Point[SHK]}}, Boxed -> False, ImageSize ->  200]


        
Bezug
Select[] korrekt verwenden: Antwort
Status: (Antwort) fertig Status 
Datum: 08:31 Mi 30.01.2013
Autor: hieron

hallo TruEnemy,

dein kriterium lautet so:

Select[points, (#[(**)[3]] > 0) &]


(**) kommentar kannst du löschen, ist nur ein workaround wegen forum
lg hieron

Bezug
Ansicht: [ geschachtelt ] | ^ Forum "Mathematica"  | ^^ Alle Foren  | ^ Forenbaum  | Materialien


^ Seitenanfang ^
www.matheforum.net
[ Startseite | Forum | Wissen | Kurse | Mitglieder | Team | Impressum ]