喆学（94）：精读复刻论文数值分析(1)

摘要：This issue of the post will introduce the numerical analysis of the intensive reading and reproduction paper "Research on Green Su

分享兴趣，传播快乐，

增长见闻，留下美好。

亲爱的您，这里是LearingYard学苑！

今天小编为您带来文章

“喆学（94）：精读复刻论文

《考虑公平偏好和绿色创新的绿色供应链策略研究》

数值分析(1)”

欢迎您的访问！

Share interest, spread happiness,

increase Knowledge, and leave beautiful.

Dear, this is the LearingYard Academy!

Today, the editor brings you the article

Zhexue (94): Intensive reading and reproduction

of the paper

"Research on green supply chain strategy

considering fairness preference and green innovation"

Numerical analysis(1)"

Welcome to visit!

本期推文将从思维导图、精读内容、知识补充三个方面介绍精读复刻论文《考虑公平偏好和绿色创新的绿色供应链策略研究》的数值分析。

This issue of the post will introduce the numerical analysis of the intensive reading and reproduction paper "Research on Green Supply Chain Strategies Considering Fairness Preferences and Green Innovation" from three aspects: Mind mapping, intensive reading content, and knowledge supplement.

一、思维导图（Mind Maps）

二、精读内容（Intensive reading content）

为了进一步验证以上结论的正确性，本节通过数值模拟的形式对本文结论进行模拟验证。首先设置相应的参数值如图所示。

In order to further verify the correctness of the above conclusions, this section simulates and verifies the conclusions of this paper through numerical simulation. First, set the corresponding parameter values as shown in the figure.

(1)MM和RM两种策略下制造商绿色创新努力或销售商绿色创新努力随着制造商公平偏好程度的变化关系图(The relationship between the manufacturer's green innovation efforts or the seller's green innovation efforts and the manufacturer's fairness preference under the MM and RM strategies)

制造商绿色创新努力随着制造商公平偏好程度的增大而不断减小。销售商绿色创新努力也随着制造商公平偏好程度的增大而不断减小。这是因为随着制造商偏好程度的增大，制造商利润和销售商利润都随之减少。因而制造商和销售商绿色创新研发的投入也会受到影响而减少。

The green innovation efforts of manufacturers decrease as the manufacturer's fairness preference increases. The green innovation efforts of sellers also decrease as the manufacturer's fairness preference increases. This is because as the manufacturer's preference increases, the manufacturer's profit and the seller's profit both decrease. Therefore, the input of green innovation research and development of manufacturers and sellers will also be affected and Reduced.

(2) MM和RM两种策略下的需求量随着制造商公平偏好程度的变化关系图(The relationship between the demand quantity under the MM and RM strategies and the manufacturer's fairness preference)

两种情形下的需求量均随着制造商公平偏好程度的增大而持续减小。这是因为制造商公平偏好程度不断增大，绿色创新努力不断减少，因而产品的绿色创新有所下降，偏好绿色产品的消费者便减少购买产品，因此需求量也会有所降低。

In both cases, the demand continues to decrease as the manufacturer's fairness preference increases. This is because the manufacturer's fairness preference continues to increase, and the green innovation efforts continue to decrease, so the green innovation of the product decreases, and consumers who prefer green products will buy fewer products, so the demand will also decrease.

(3)综合结论(Summary)

销售商推动绿色创新且制造商公平偏好策略下的绿色创新努力、产品需求量均大于制造商推动绿色创新且制造商公平偏好策略下的绿色创新努力、产品需求量。

The green innovation efforts and product demand under the strategy of sellers promoting green innovation and manufacturers’ fair preference are greater than those under the strategy of manufacturers promoting green innovation and manufacturers’ fair preference.

三、知识补充（Knowledge supplement）

在 Mathematica 中，绘图是非常强大的功能之一。你可以利用它进行函数绘制、几何图形绘制、数据可视化等多种类型的图形制作。以下是一些基本的绘图方法：

In Mathematica, plotting is one of the most powerful features. You can use it to plot functions, geometric figures, data visualization and many other types of graphics. Here are some basic plotting methods:

(1)绘制函数图像(Plotting a function)

绘制一个函数的图像非常简单。你只需使用Plot函数。例如，绘制函数y = sin(x)：Plot[Sin[x], {x, 0, 2 Pi}]。

Plotting a function is very simple. You just use the Plot function. For example, to plot the function y = sin(x): Plot[Sin[x], {x, 0, 2 Pi}].

(2)绘制多函数图像(Plotting multiple functions)

你可以在同一张图中绘制多个函数，使用Plot来列出多个表达式：Plot[{Sin[x], Cos[x]}, {x, 0, 2 Pi}]。

You can plot multiple functions on the same graph, using Plot to list multiple expressions: Plot[{Sin[x], Cos[x]}, {x, 0, 2 Pi}].

(3)3D 图形(3D Graphics)

Mathematica还支持三维图形。例如，绘制一个三维曲面 z = sin(x) * cos(y)：Plot3D[Sin[x] * Cos[y], {x, -Pi, Pi}, {y, -Pi, Pi}]。

Mathematica also supports 3D graphics. For example, to plot a 3D surface z = sin(x) * cos(y): Plot3D[Sin[x] * Cos[y], {x, -Pi, Pi}, {y, -Pi, Pi}].

(4)自定义图形样式(Custom graphic styles)

Mathematica提供了很多选项来定制图形的样式，例如线条颜色、图例、标题等。例如，改变函数图形的颜色：Plot[Sin[x], {x, 0, 2 Pi}, PlotStyle -> Red]。如果你想给图形添加标题和标签：Plot[Sin[x], {x, 0, 2 Pi}, PlotLabel -> "Sine Wave", AxesLabel -> {"x", "y"}]。

Mathematica provides many options for customizing the style of graphs, such as line color, legends, titles, etc. For example, to change the color of a function graph: Plot[Sin[x], {x, 0, 2 Pi}, PlotStyle -> Red]. If you want to add a title and label to your graph: Plot[Sin[x], {x, 0, 2 Pi}, PlotLabel -> "Sine Wave", AxesLabel -> {"x", "y"}].

今天的分享就到这里了。

如果您对文章有独特的想法，

欢迎给我们留言，

让我们相约明天。

祝您今天过得开心快乐！

That's all for today's sharing.

If you have a unique idea about the article,

please leave us a message,

and let us meet tomorrow.

I wish you a nice day!

翻译：谷歌翻译

参考资料：谷歌、Chat GPT