r - Rで制御フロー関数(for、while、if)なしで1000未満のすべてのピタゴラスのトリプルを見つける方法は?

Question

if制御フロー ステートメント、つまり,を使用せずに、whileそのようなすべてのトリプレットをリストする R 関数を記述します{a, b, c} less than 1000 and a < b < c。どの関数が役立つかを知る以外に、この問題に対処する方法がわかりません。私はある種の再帰を推測しています。