PDA

Archiv verlassen und diese Seite im Standarddesign anzeigen : "noise" in sin-Funktion (PSTricks)



LordSnyder
06-11-2010, 16:37
Hallo ich möchte gerne eine Sinusfunktion mit einem bestimmten "noise" abbilden. Die Funktion soll also zufällig kleine Ausschläge haben.

Dazu habe ich mir mal die Vorlage von Herbert Voss genommen und versucht, es abzuwandeln. Jedoch bekomme ich nur Fehler bei der Erzeugung mit Postscript.

Ich kann mir aber nicht erklären, was an der Verwendung der Zufallszahlen falsch sein soll.

Evtl. hilft der Code:


\documentclass{article}
\usepackage[latin1]{inputenc}
\usepackage[T1]{fontenc}
\usepackage[ngerman]{babel}
\usepackage{amsmath}
\usepackage{pstricks}
\usepackage{pst-plot}
\title{Offset}

\begin{document}

\pstVerb{

/randReal { rand 2.147483647e09 div } def

rrand srand

}

\psset{xunit=1cm, yunit=1cm, runit=1cm}
\begin{figure}
\begin{pspicture}(0,0)(10,10)
\psaxes[axesstyle=axes,linewidth=1.5pt]{->}(0,0)(0,-1)(9,4)
\pstVerb{ 987654321 srand }
\psplot[linecolor=black,linewidth=1.5pt]{0}{9}{x rrandReal div 2 div RadtoDeg sin}
\end{pspicture}
\end{figure}

\end{document}

Vielen Dank schon mal für eure Hilfe.

mechanicus
06-11-2010, 17:04
Hi,


\documentclass{article}
\usepackage[latin1]{inputenc}
\usepackage[T1]{fontenc}
\usepackage[ngerman]{babel}
\usepackage{amsmath}
\usepackage{pstricks}
\usepackage{pst-plot}
\title{Offset}

\begin{document}


\psset{xunit=1cm, yunit=1cm, runit=1cm}
\begin{figure}
\begin{pspicture}(0,0)(10,10)
\pstVerb{
/randReal { rand 2.147483647e09 div } def
rrand srand
}
\psaxes[axesstyle=axes,linewidth=1.5pt]{->}(0,0)(0,-1)(9,4)
\pstVerb{ 987654321 srand }
\psplot[linecolor=black,linewidth=1.5pt]{0}{9}{x randReal div 2 div RadtoDeg sin}
\end{pspicture}
\end{figure}

\end{document}

Gruß
Marco

voss
06-11-2010, 17:59
Hallo ich möchte gerne eine Sinusfunktion mit einem bestimmten "noise" abbilden. Die Funktion soll also zufällig kleine Ausschläge haben.



\documentclass{article}
\usepackage{pst-plot}

\begin{document}

\begin{pspicture}(0,-1.5)(10,1.5)
\psaxes[axesstyle=axes]{->}(0,0)(0,-2)(9,2)
\psplot[linecolor=blue,linewidth=1.5pt,plotpoints=200]
{0}{9}
[ rrand srand ]
{x RadtoDeg sin Rand Rand 0.5 gt {add}{sub}ifelse}
\end{pspicture}

\end{document}

Herbert

LordSnyder
06-11-2010, 20:29
Vielen, vielen Dank für die Vorlagen, das hat mir sehr geholfen.

Viele Grüße.