リストは、r

Question

に多項式を解決するためのすべてのソリューションは、私は式50倍+ 50Y = 200を持っている、と私はとRでプログラミング：

a = array(c(50,50),c(1,2)) 
b = c(200) 
qr.solve(a,b) 

それだけで、結果として4と0を示し判明します。だから、私の質問は、すべてのソリューションをリストする方法はありますか？あなたは非負整数解が必要な場合は事前

Answer 1

で

おかげで、あなたは0 < = X < = 4と0 < = Y = 4 <ので、力ずくで簡単に行うことができます。

dd <- expand.grid(x=0:4,y=0:4) 
with(dd,dd[50*x+50*y==200,]) 
## x y 
## 5 4 0 
## 9 3 1 
## 13 2 2 
## 17 1 3 
## 21 0 4 

（最初の列を無視すると、元のデータフレームの行番号だけです）