Eine geogebra-Übersetzung darf man sich am Anfang schon mal ausgeben lassen.
Allerdings sollte man sich, den Code betrachtend, fragen:
·Braucht - Braucht man wirklich die Zahlen auf 10 Nachkommastellen genau?
·Braucht - Braucht man wirklich solche komplizierten Farben, statt einfach blue, red etc.?
·Ferner - Ferner sollte man die, teils ausgefallenen, Bibliotheken unter die Lupe nehmen, die geogebra vermutlich standardmäßig reinschreibt.
·Mit - Mit Polstellen kommt TikZ nicht zurecht, man muß also von Polstelle bis Polstelle zeichnen.
Wenn man das, neben dem bereits genannten Eingabefehler, alles mal der Reihe nach korrigiert, dann klappt das auch:
![alt text][1]
\documentclass[margin=2.5mm]{standalone}
\usepackage[ngerman]{babel}
\usepackage{tikz}
\usepackage{amsmath, amssymb}
%===========
\begin{document}
%===========
\begin{tikzpicture}[x = 52.5cm, y=150.5cm, scale=0.25,
font=\footnotesize,
>=latex %Voreinstellung für Pfeilspitzen
]
% Gitternetzlinien
%\draw[ help lines] (-3.5,-3.5) grid (3.5,3.5);
% x-Achse
\draw[->] (-0.55,0) -- (0.55,0) node[below] {$x$};
%Zahlen auf x-Achse
\foreach \x in {-0.5,-0.25,0.25,0.5}
\draw[shift={(\x,0)},color=black] (0pt,2pt) -- (0pt,-2pt) node[below] {$\x$};
% y-Achse
\draw[->] (0,-0.12) -- (0,0.12) node[left] {$y$};
%Zahlen auf y-Achse
\foreach \y in {-0.1,-0.05,0.05,0.1}
\draw[] (2pt,\y) -- (-2pt,\y) node[left] {$\y$};
%Ursprung
\draw[color=black] (0pt,-5pt) node[right] {$0$};
%%%%%%%%%%%%%%%%
%% FUNKTION %%
%%%%%%%%%%%%%%%%
\draw[thick,red] plot[samples=800, domain=0.01:0.4]
(\x,{((\x)^2)*sin((1/\x) r)}) node[above, right] {$f(x)=x^2 \cdot \sin\left(\frac{1}{x}\right)$};
\draw[thick,red] plot[samples=600, domain=-0.01:-0.4]
(\x,{((\x)^2)*sin((1/\x) r)});
%Einhüllende
\draw[densely dashed] plot[domain=-0.3:0.3](\x,{(\x)^2});
%
\draw[densely dashed] plot[domain=-0.3:0.3](\x,{-(\x)^2});
\end{tikzpicture}
%===========
\end{document}
%===========
[1]: http://texwelt.de/wissen/upfiles/aaaaaha22tf__--13-1215_03_3.png
