Optierung von Komplexen Zahlen

["Klaus Peter Koch" <kochk@XXXXXXX.de>]

Hallo Mathematica Freunde,

Ich möchte ein Minimum eines Betrages einer Komplexen Funktion finden. Hier
ein Kurzes Beispiel:

test[{f_, R1_}] := Abs[f^2 + R1^2] + 1;
FindMinimum[test[{f, R1}], {f, 10}, {R1, 2}]

Dies funktioniert nich was kann ich tun?

Danke für die Hilfe.
Klaus