公告：本站正式转型为非交互式静态网站！
转型：本站将通过笔记和博客的形式继续为大家服务，关于 Mathematica 问答服务请移步至QQ群：365716997。
联系：如有问题请联系QQ群管理员，或发送邮件至：lixuan.xyz@qq.com。
感谢：最后非常感谢大家多年来的支持与帮助！
参考：《互联网跟帖评论服务管理规定》《中华人民共和国网络安全法》《网络信息内容生态治理规定》《互联网用户账号信息管理规定》

—— 2022-11-27

欢迎来到 Mathematica 问答社区

● 提问时请贴上文本代码

● 语法高亮：在编辑器中点击

● 被禁止的话题：广告，破解

● 请阅读：《提问的智慧》

● 备用域名：mma.ooo

● 支持LaTex数学公式：
行内公式标识符：\$ 或“$\backslash ($”+“$\backslash )$”，
行间公式标识符：\$\$ 或 “$\backslash [$”+“$\backslash ]$”

● 社区建议QQ群：365716997

538 问题

531 回答

1.5k 留言

229 用户

标签热度

画图 函数 方程 列表操作 微分方程 绘图 算法 化简 wolfram语言入门 编译 方程；函数；符号运算； 符号运算 数值算法 bug 插值函数 表达式 数据筛选 符号，匹配 定义函数 文本 运行 积分 并行 矩阵 随机 动态 拟合 精度 定积分 数据的导入与导出 迭代 替换 数值积分 颜色 图像处理 为什么这个程序的运行结果一直不对呀？ 模式 线性规划 爬虫 极限 读入文件 数组操作 程序包 规则 显示调用 计算 图论-矩阵-文件导出 并行运算 偏微分方程 大数据 excel 输出格式 字符串操作 安装 性能优化 纯函数 colorfunction 选项 manipulate 求最值 基础数学 空间曲面 解方程 变换 字符画 计算控制 g6-图论-矩阵导出 导出 坐标轴 软件打开 隐函数 化简；符号运算 ；列表 子群 内部数据获得 分段函数 多项式 列表运算 网络 统计 字体大小调节 逻辑运算化简 数组赋值 数值 相似矩阵 柱状图 netlink 数值算法，超越方程 分布式计算 复变函数 图像 鼠标 动画 聚类分析 椭圆 未知错误 ndsolve ， 曲线图 傅里叶变换

分类

求二维数组的区域极大值，求x在2600-3000间的极大值。

0 投票
2.1k 浏览

 

data={{2595.76, 0.000692501}, {2597.69, 0.000747758}, {2599.61, 0.000804909}, {2601.54, 0.000857249}, {2603.47, 0.000915285}, {2605.4, 0.000971129}, {2607.33, 0.00103177}, {2609.26, 0.00109435}, {2611.19, 0.00116123}, {2613.11, 0.00123059}, {2615.04, 0.00130112}, {2616.97, 0.00137482}, {2618.9, 0.00145834}, {2620.83, 0.00155051}, {2622.76, 0.00165481}, {2624.69, 0.00176818}, {2626.61, 0.00189417}, {2628.54, 0.00203138}, {2630.47, 0.002194}, {2632.4, 0.00237739}, {2634.33, 0.00258379}, {2636.26, 0.00280479}, {2638.18, 0.00303875}, {2640.11, 0.00327698}, {2642.04, 0.00351069}, {2643.97, 0.00373329}, {2645.9, 0.00394237}, {2647.83, 0.00412218}, {2649.76, 0.00427206}, {2651.68, 0.00438529}, {2653.61, 0.00446627}, {2655.54, 0.0045179}, {2657.47, 0.00455074}, {2659.4, 0.00456874}, {2661.33, 0.0045813}, {2663.25, 0.00458731}, {2665.18, 0.00459571}, {2667.11, 0.0046107}, {2669.04, 0.00463695}, {2670.97, 0.00468661}, {2672.9, 0.00477598}, {2674.83, 0.00489715}, {2676.75, 0.00506004}, {2678.68, 0.00525445}, {2680.61, 0.00547971}, {2682.54, 0.00572805}, {2684.47, 0.00598887}, {2686.4, 0.00624912}, {2688.33, 0.00649204}, {2690.25, 0.00669059}, {2692.18, 0.00684037}, {2694.11, 0.00692781}, {2696.04, 0.00695141}, {2697.97, 0.00692074}, {2699.9, 0.00684713}, {2701.82, 0.00672837}, {2703.75, 0.00658899}, {2705.68, 0.00643942}, {2707.61, 0.00629571}, {2709.54, 0.00616508}, {2711.47, 0.00605992}, {2713.4, 0.00598401}, {2715.32, 0.00593572}, {2717.25, 0.00591187}, {2719.18, 0.00591824}, {2721.11, 0.00594162}, {2723.04, 0.00598835}, {2724.97, 0.00605281}, {2726.9, 0.00612762}, {2728.82, 0.00620873}, {2730.75, 0.00630628}, {2732.68, 0.00641316}, {2734.61, 0.00652735}, {2736.54, 0.00664618}, {2738.47, 0.00677772}, {2740.39, 0.0069184}, {2742.32, 0.00707008}, {2744.25, 0.00723897}, {2746.18, 0.0074305}, {2748.11, 0.00764001}, {2750.04, 0.00788015}, {2751.97, 0.00814771}, {2753.89, 0.00844686}, {2755.82, 0.00877984}, {2757.75, 0.00915252}, {2759.68, 0.00956529}, {2761.61, 0.0100251}, {2763.54, 0.0105257}, {2765.47, 0.0110869}, {2767.39, 0.0117216}, {2769.32, 0.0124403}, {2771.25, 0.0132517}, {2773.18, 0.0141673}, {2775.11, 0.0151929}, {2777.04, 0.0163331}, {2778.96, 0.0175801}, {2780.89, 0.018928}, {2782.82, 0.0203512}, {2784.75, 0.0218254}, {2786.68, 0.0233052}, {2788.61, 0.0247557}, {2790.54, 0.0261408}, {2792.46, 0.0274448}, {2794.39, 0.0286381}, {2796.32, 0.0297074}, {2798.25, 0.0306425}, {2800.18, 0.031455}, {2802.11, 0.032163}, {2804.04, 0.0327892}, {2805.96, 0.0333605}, {2807.89, 0.0339131}, {2809.82, 0.0344691}, {2811.75, 0.0350611}, {2813.68, 0.0357086}, {2815.61, 0.0364387}, {2817.53, 0.0372588}, {2819.46, 0.0381594}, {2821.39, 0.0391116}, {2823.32, 0.0401017}, {2825.25, 0.0410952}, {2827.18, 0.0420683}, {2829.11, 0.0430056}, {2831.03, 0.0439057}, {2832.96, 0.0447703}, {2834.89, 0.0456175}, {2836.82, 0.0464772}, {2838.75, 0.0474131}, {2840.68, 0.0484741}, {2842.61, 0.0497066}, {2844.53, 0.0511272}, {2846.46, 0.0527395}, {2848.39, 0.0545429}, {2850.32, 0.0565612}, {2852.25, 0.058807}, {2854.18, 0.0613118}, {2856.1, 0.0641114}, {2858.03, 0.0672658}, {2859.96, 0.0708083}, {2861.89, 0.0747529}, {2863.82, 0.0790979}, {2865.75, 0.0838067}, {2867.68, 0.0887475}, {2869.6, 0.093765}, {2871.53, 0.0986875}, {2873.46, 0.103406}, {2875.39, 0.107887}, {2877.32, 0.1122}, {2879.25, 0.116498}, {2881.18, 0.120986}, {2883.1, 0.125826}, {2885.03, 0.131114}, {2886.96, 0.1368}, {2888.89, 0.142695}, {2890.82, 0.14845}, {2892.75, 0.153589}, {2894.67, 0.1576}, {2896.6, 0.160062}, {2898.53, 0.160685}, {2900.46, 0.159393}, {2902.39, 0.156305}, {2904.32, 0.151761}, {2906.25, 0.146219}, {2908.17, 0.140191}, {2910.1, 0.134143}, {2912.03, 0.128459}, {2913.96, 0.12339}, {2915.89, 0.119065}, {2917.82, 0.115477}, {2919.75, 0.112593}, {2921.67, 0.110408}, {2923.6, 0.108979}, {2925.53, 0.108471}, {2927.46, 0.109241}, {2929.39, 0.111782}, {2931.32, 0.116696}, {2933.24, 0.124479}, {2935.17, 0.135437}, {2937.1, 0.149497}, {2939.03, 0.166129}, {2940.96, 0.184366}, {2942.89, 0.203015}, {2944.82, 0.220738}, {2946.74, 0.236287}, {2948.67, 0.248599}, {2950.6, 0.256951}, {2952.53, 0.26104}, {2954.46, 0.261027}, {2956.39, 0.257416}, {2958.31, 0.250966}, {2960.24, 0.242479}, {2962.17, 0.232699}, {2964.1, 0.222159}, {2966.03, 0.211177}, {2967.96, 0.199898}, {2969.89, 0.18844}, {2971.81, 0.176873}, {2973.74, 0.165297}, {2975.67, 0.153826}, {2977.6, 0.142623}, {2979.53, 0.131817}, {2981.46, 0.121536}, {2983.39, 0.111888}, {2985.31, 0.102941}, {2987.24, 0.094718}, {2989.17, 0.0872579}, {2991.1, 0.0805461}, {2993.03, 0.0745791}, {2994.96, 0.0693164}, {2996.89, 0.0647107}, {2998.81, 0.0607013}, {3000.74, 0.0572328}, {3002.67, 0.054242}, {3004.6, 0.0516835}, {3006.53, 0.0494801}, {3008.46, 0.0475906}, {3010.38, 0.0459943}, {3012.31, 0.0446362}, {3014.24, 0.0434967}, {3016.17, 0.0425668}, {3018.1, 0.0417878}, {3020.03, 0.0411811}}

分类:列表操作 | 用户: 奋斗的大灰狼 (206 分)

3 个回答

+1 投票 
Max[Select[data, 2600 <= #[[1]] <= 3000 &][[;; , 2]]]

 

用户: 野鹤 (5.1k 分)
好像是说极大值，不是最大值
用户: Lozmlve*永 (1.2k 分)
哦，原来人家是要峰值的。
用户: 野鹤 (5.1k 分)
0 投票 
Max[Select[data, 2600 < #[[1]] < 3000 &][[All, 2]]]

 

用户: 落雨流觞 (1.1k 分)
0 投票 
Bdata = Select[data, Between[First[#], {2600, 3000}] &];
ListLinePlot[data, 
 Epilog -> {PointSize[.01], 
   Point[Bdata[[First /@ FindPeaks[Last /@ Bdata]]]]}]

用户: Lozmlve*永 (1.2k 分)
 | Snow Theme by Q2A Market
Powered by Question2Answer
...