Mathematica求导的基本使用以及进行求解同时决策均衡批发价与相关均衡解

工具介绍

        Mathematica是由Wolfram Research开发的计算软件程序。它提供了一个全面的科学和技术计算环境，涵盖了广泛的数学、统计和图形任务。Mathematica将强大的符号计算引擎与高级编程语言相结合，适用于各种应用。它允许您进行计算、解方程、可视化数据、创建交互模型等等。

相关软件下载与安装：Wolfram Mathematica 13.0下载与安装教程，23.07.15安装_想造一顶白cap的博客-CSDN博客    

例题如下（选自niu2018）Base模型：

        其中cs代表竞争供应商的利润，o代表OEM（Original Entrusted Manufacture）“原始设备制造商”的利润。Wcs是cs的批发价格，m表示了产品品牌效应所带来的影响。

        决策环境如下：先由cs决定自身的Wcs批发价格，再由oem与cs同时决定其产量qcs、qo，进而投放市场进行销售与盈利。

Mathematica  启动  ！

        新建笔记本文档.nb

        输入上述的利润函数数学模型公式。然后，轻轻敲击右enter，没有右enter，ctrl+enter。 

        

        本着谁后决策，先求谁的原则，进行回推求解。因此先对qcs与qb进行求导求解:

Solve[]//进行解方程
D[f,x]//对f求x的偏导

        然后将qcs与qb进行联立求解：

        此时得到cs与oem同时决策下的qcs与qb。

         将qb与qcs进行相应的赋值   

     

        此时的Wcs还没有求解，所以再通过qcs进行求解Wcs的值，步骤重复前面的求导求解过程。

         

        此时我们已经求解出来了均衡批发价格，进而进行Wcs的赋值，进行带入求解qcs=qo,qb,cs,o。

        

 Simplify[]//对内部进行化简处理。

 

 

        结束，以上是我在学习相关内容的过程中，于网上寻找均衡解方法未果后，询问导师后，所学习到的技巧与经验，分享给大家，供大家学习使用。