Re: [Dmug] Häuffigkeit,2 korrespondierende Listen, Durchschnitt

[Peter Pein via demug <demug@XXXXXXX.ch>]

pardon, ich hatte vorhin versehentlich die Eingabetaste gedrückt und
eine nichtssagende 'Antwort' versandt. Dazu kommt noch, dass ich beim
zweiten Versuch ein falsches Alias als Absender eingestellt hatte
(Web-Mail ist schon schwierig - verglichen mit Thunderbird). Nun sollte
es aber funktionieren (stöhn!):


Falls ich mich recht erinnere, müsste mit den Mitteln der Version 5.2

In[3]:= plotlist = Through[{Length, Mean[#[[All, 2]]]&}[#]]& /@
                  (Join @@@ BinLists[Transpose[{Reihe1, ReiheWerte}]])
// Transpose
Out[3]= {{3,4,1,2},{20/3,7,10,17/2}}

In[4]:= ListPlot[plotlist, Joined -> {True, False}, PlotStyle ->
{{Blue}, {Red}}, Frame -> True,
                       DataRange -> {1, Length[plotlist[[1]]]} ]

möglich sein.

Gruß,
  Peter


----- Original Nachricht ----
Von:     Daniel Wehrli via demug <demug@XXXXXXX.ch>
An:      demug@XXXXXXX.ch
Datum:   07.04.2015 20:15
Betreff: [Dmug] Häufigkeit,2 korrespondierende Listen, Durchschnitt

>    Ich bin im Besitz von Mathematica 5.2
>
>    Thema: Kompliziertes Sortierproblem, Zusammenfassungsproblem,
>    Durchschnittberechnungspoblem
>
>    Ich habe 2 Listen:
>    -Reihe1        = {2.272727273`, 1.33037694`, 3.112840437`, 1.5625`,
>    0.288184438`, 0.49382716`, 1.685393258`, 0.215053781`, 1.538461477`,
>    3.100775194`} und
>    -ReiheWerte = {10, 4, 11, 5, 7,9, 8,4, 11, 6}
....


---
Diese E-Mail wurde von Avast Antivirus-Software auf Viren geprüft.
http://www.avast.com

_______________________________________________
DMUG Deutschsprachiges Mathematica-Forum demug@XXXXXXX.ch
http://www.mathematica.ch/mailman/listinfo/demug
Archiv: http://www.mathematica.ch/archiv.html