Mathematica xy-Wert löschen < Mathematica < Mathe-Software < Mathe < Vorhilfe
|
Status: |
(Frage) beantwortet | Datum: | 17:04 Do 22.09.2011 | Autor: | Ralf.ju |
Hallo,
eine relativ einfache Frage:
ich möchte gerne xy-Paare aus einer Tabelle löschen.
Bedingung ist beispielsweise: Löschen für alle y-Werte größer/kleiner einem bestimmten Wert. Ich habe das ganze schon mit den Befehlen Select, DeleteCases u.ä. versucht; kann aber immer nur einzelne Werte löschen.
PS: "Select" funktioniert ja schön, aber eben nur, wenn man nur eine Zeile betrachtet, z.B.
Select[{1, 2, 4, 7, 6, 2}, # > 2 &]
{4, 7, 6}
Wenn man aber zwei oder mehrere Spalten hat, finde ich nur leider keine Lösung. Hier mal ein kurze Beispielansatz:
(Ziel: Nehme alle Paare mit einem y-Wert größer 12)
Select[{{1, 11}, {2, 12}, {3, 16}, {4, 13}, {5, 10}}, ...]
bei "..." müsste irgenein Befehl eingefügt werden, der auf die y-Werte zugreift mit der Verknüpfung "_>12", so dass am Ende folgendes rauskommt:
{{3, 16}, {4, 13}}
Schon mal vielen Dank für eure Hilfe!
Ich habe diese Frage in keinem Forum auf anderen Internetseiten gestellt.
|
|
|
|
> Wenn man aber zwei oder mehrere Spalten hat, finde ich nur
> leider keine Lösung. Hier mal ein kurze Beispielansatz:
> (Ziel: Nehme alle Paare mit einem y-Wert größer 12)
>
> Select[{{1, 11}, {2, 12}, {3, 16}, {4, 13}, {5, 10}}, ...]
>
> bei "..." müsste irgenein Befehl eingefügt werden, der
> auf die y-Werte zugreift mit der Verknüpfung "_>12", so
> dass am Ende folgendes rauskommt:
> {{3, 16}, {4, 13}}
So geht's:
Select[{{1, 11}, {2, 12}, {3, 16}, {4, 13}, {5, 10}}, #[[2]] > 12 & ]
LG Al-Chw.
|
|
|
|
|
Status: |
(Mitteilung) Reaktion unnötig | Datum: | 09:48 Fr 23.09.2011 | Autor: | Ralf.ju |
Ich sagte doch sehr einfach! Aber manchmal kommt man einfach nicht drauf.
Vielen Dank für deine Hilfe!
Schönen Gruß
|
|
|
|