🎄teratailクリスマスプレゼントキャンペーン2024🎄』開催中!

\teratail特別グッズやAmazonギフトカード最大2,000円分が当たる!/

詳細はこちら
VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

C#

C#はマルチパラダイムプログラミング言語の1つで、命令形・宣言型・関数型・ジェネリック型・コンポーネント指向・オブジェクティブ指向のプログラミング開発すべてに対応しています。

Q&A

1回答

4370閲覧

C#でMicrosoft Solver Foundationを使ったソルバーの実行

nanashi774

総合スコア4

VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

C#

C#はマルチパラダイムプログラミング言語の1つで、命令形・宣言型・関数型・ジェネリック型・コンポーネント指向・オブジェクティブ指向のプログラミング開発すべてに対応しています。

0グッド

1クリップ

投稿2019/10/14 03:34

前提・実現したいこと

当方、プログラミング初心者で教えていただきたいのですが、
現在、VBAで書かれたソルバーのコードを、C#で書き直す作業を行っています。
その際にMicrosoft Solver Foundationを使用しています。

内容的には、セルB2に5 セルB3に2 セルB4にA1/A2の計算式が入っている状態で、
B2の値は1030 B3の値は210 B4の値は2以上とする時、B4が最大になるような答えが出るようにしたいのですが、
エラーを解決することができません。
よろしくお願いいたします。

発生している問題・エラーメッセージ

エラー1 UnsolvableModelException: No solver could be found that can accept the model given the model type and directive(s) エラー2 ModelException: Microsoft.SolverFoundation.Services.SimplexDirective cannot solve CP models. Remove this directive and use a directive that supports the CP capability.

該当のソースコード

C#

1using System; 2using System.Collections.Generic; 3using System.Linq; 4using System.Text; 5using System.Threading.Tasks; 6using Microsoft.SolverFoundation.Common; 7using Microsoft.SolverFoundation.Services; 8using Microsoft.SolverFoundation.Solvers; 9 10namespace solver 11{ 12 class solver_test 13 { 14 15 static void Main(string[] args) 16 { 17 SolverContext context = new SolverContext(); 18 Model model = context.CreateModel(); 19 20 //変数の作成 21 Decision b2 = new Decision(Domain.Integer, "b2"); 22 Decision b3 = new Decision(Domain.Integer, "b3"); 23 Decision b4 = new Decision(Domain.Integer, "b4"); 24 25 //modelに変数を追加 26 model.AddDecision(b2); 27 model.AddDecision(b3); 28 model.AddDecision(b4); 29 30 //制約追加 31 model.AddConstraint("limit1", 10 <= b2 <= 30); 32 model.AddConstraint("limit2", 2 <= b3 <= 10); 33 model.AddConstraint("limit3", 2 <= b4 <= 100); 34 model.AddConstraint("limit4", b2 / b3 <= b4 <= b2 / b3); 35 36 //ゴールの設定 37 model.AddGoal("Goal", GoalKind.Maximize, b4); 38 39 // Solution 40 Solution solution = context.Solve(new SimplexDirective()); 41 Report report = solution.GetReport(); 42 Console.WriteLine(report); 43 } 44 } 45}

試したこと

最初は
model.AddConstraint("limit4", b2 / b3 <= b4 <= b2 / b3);
の部分を
model.AddConstraint("limit4", b2 + b3 <= b4 <= b2 + b3);
のように足し算にしており、動作することは確認できたのですが、計算式に割り算や掛け算が入ると、
エラーが発生します。

補足情報(FW/ツールのバージョンなど)

ここにより詳細な情報を記載してください。

気になる質問をクリップする

クリップした質問は、後からいつでもMYページで確認できます。

またクリップした質問に回答があった際、通知やメールを受け取ることができます。

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

guest

回答1

0

エラー文で検索したところ、Solution solution = context.Solve();と回答がありました。
Optimal portfolio model - error

cs

1using System; 2using Microsoft.SolverFoundation.Services; 3 4namespace Questions217122 5{ 6 internal class Program 7 { 8 private static void Main() 9 { 10 var context = new SolverContext(); 11 var model = context.CreateModel(); 12 13 var b2 = new Decision(Domain.Integer, "b2"); 14 var b3 = new Decision(Domain.Integer, "b3"); 15 var b4 = new Decision(Domain.Integer, "b4"); 16 17 model.AddDecision(b2); 18 model.AddDecision(b3); 19 model.AddDecision(b4); 20 21 model.AddConstraint("limit1", 10 <= b2 <= 30); 22 model.AddConstraint("limit2", 2 <= b3 <= 10); 23 model.AddConstraint("limit3", 2 <= b4 <= 100); 24 model.AddConstraint("limit4", b2 / b3 <= b4 <= b2 / b3); 25 26 model.AddGoal("Goal", GoalKind.Maximize, b4); 27 28 var solution = context.Solve(); 29 var report = solution.GetReport(); 30 Console.WriteLine(report); 31 } 32 } 33}

実行結果

===Solution Details=== Goals: Goal: 15 Decisions: b2: 30 b3: 2 b4: 15

私は全く使ったことないので、これでいいのかわかりません。

投稿2019/11/18 02:55

編集2023/07/17 04:30
TN8001

総合スコア9855

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

あなたの回答

tips

太字

斜体

打ち消し線

見出し

引用テキストの挿入

コードの挿入

リンクの挿入

リストの挿入

番号リストの挿入

表の挿入

水平線の挿入

プレビュー

まだベストアンサーが選ばれていません

会員登録して回答してみよう

アカウントをお持ちの方は

15分調べてもわからないことは
teratailで質問しよう!

ただいまの回答率
85.36%

質問をまとめることで
思考を整理して素早く解決

テンプレート機能で
簡単に質問をまとめる

質問する

関連した質問