ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
楼主: baomaboy

[原创] 通用工程试验函数集V2.38(For_2003~2010)

  [复制链接]

TA的精华主题

TA的得分主题

发表于 2012-1-10 23:28 | 显示全部楼层
本帖已被收录到知识树中,索引项:其他资源
有用,非常有用。

TA的精华主题

TA的得分主题

发表于 2012-3-19 15:29 | 显示全部楼层
路过学习,谢谢楼主的分享

TA的精华主题

TA的得分主题

发表于 2012-3-20 21:36 | 显示全部楼层
继续来这里支持下楼主,很有用的东西 对我们来说

TA的精华主题

TA的得分主题

发表于 2012-3-20 22:49 | 显示全部楼层
要是国家规范更新不是这么快,想必微软会照顾一下工程行业的人,对于四舍六入的问题,有很多同行提起,呵呵,在此感谢楼主的无私奉献……

TA的精华主题

TA的得分主题

发表于 2012-3-21 11:50 | 显示全部楼层
楼主:
     您好!以下是您的《通用工程函数集》中“土的颗粒分析成图”原理:
【'   根据其中采用的算法,进一步增添根据X坐标求Y坐标,或根据Y坐标求X坐标,更切合实际需求
'   这个自定义函数按照Excel的曲线算法(三次贝塞尔分段插值),计算平滑曲线上任意一点的点坐标
'
'   Excel的平滑曲线的大致算法是:
'   给出了两组X-Y数值以后,每一对X-Y坐标称为节点,然后在每两个节点之间画出三次贝塞尔曲线(下面简称曲线)
'   贝塞尔曲线的算法网上有很多资源,这里不介绍了,只作简单说明
'   每条曲线都由四个节点开始,计算出四个贝塞尔控制点,然后根据控制点画出唯一一条曲线
'   假设曲线的源数据是节点1,节点2,节点3,节点4(Dot1,Dot2,Dot3,Dot4)
'   那么贝塞尔控制点的计算如下                  程序作者: 海底眼(Mr. Dragon Pan)
'   Dot2是第一个控制点,也是曲点的起点,Dot3是第四个控制点也是曲线的终点
'
'   第二个控制点的位置是:
'       过第一个控制点(Dot2,起点),与Dot1, Dot3的连线平行,且与Dot2距离为 1/6 * 线段Dot1_Dot3的长度
'       假如是图形的第一段曲线,取节点1,1,2,3进行计算,即 Dot2 = Dot1
'       且第二个控制点与第一控制点距离取 1/3 * |Dot1_Dot3|,而不是1/6 * |Dot1_Dot3|
'       假如 1/2 * |Dot2_Dot3| < 1/6 * |Dot1_Dot3|
'       那么第二个控制点与第一控制点距离取  1/2 * |Dot2_Dot3|,而不是1/6 * |Dot1_Dot3|
'
'   第三个控制点的位置是:
'       过第四个控制点(Dot3,终点),与Dot2, Dot4的连线平行,且与Dot3距离为 1/6 * |Dot2_Dot4|
'       假如是图形的最后一段曲线,取节点Last-2,Last-1,Last,Last进行计算,即 Dot4 = Dot3
'       且第三个控制点与第四控制点距离取 1/3 * |Dot2_Dot4|,而不是1/6 * |Dot2_Dot4|
'       假如 1/2 * |Dot2_Dot3| < 1/6 * |Dot2_Dot4|
'       那么第二个控制点与第一控制点距离取  1/2 * |Dot2_Dot4|,而不是1/6 * |Dot2_Dot4|
'...............................................................................................
'   这个自定义函数的计算流程是
'   Step1: 检查输入的X-Y数值是否有错误,如(输入不够三个点,X-Y的数量不一致,起始搜索节点超过范围等等)
'   Step2: 从参数指定的节点开始,计算出四个贝塞尔控制点,得到贝塞尔插值多项式方程,
'          然后代入已知的待求数值,看它能不能满足 f(t)=0 有解 (即曲线包含待查数值)
'   Step3: 如果 f(t)=0 有解,根据解出来的 t 值计算X-Y坐标,退出程序,否则继续检查下一段曲线
'   Step4: 如果所有分段曲线都不包含待查数值,退出程序】
     注:根据这种方法做出的图,好像不是很准确啊,关于此问题的一些想法,请看附件图片,希望诸位高手、专家对此问题进行探究……

TA的精华主题

TA的得分主题

发表于 2012-3-21 11:52 | 显示全部楼层
附件:土的颗粒分析图
颗粒分析图.jpg

TA的精华主题

TA的得分主题

发表于 2012-3-21 11:58 | 显示全部楼层
呵呵,别嫌我麻烦啊,还希望楼主(作者)对您的《通用工程试验函数集》附件一些使用说明(如:自定义函数的使用说明),这样以便更多的人方便使用……   谢谢楼主!

TA的精华主题

TA的得分主题

发表于 2012-3-21 12:52 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
楼主能不能将四舍六入的源代码公布给大家学习一下呢?

TA的精华主题

TA的得分主题

 楼主| 发表于 2012-3-23 20:51 | 显示全部楼层
本帖最后由 baomaboy 于 2012-4-3 17:15 编辑
Excel2119 发表于 2012-3-21 11:50
楼主:
     您好!以下是您的《通用工程函数集》中“土的颗粒分析成图”原理:
【'   根据其中采用的算法 ...


你好:
我的《通用工程函数集》中的 “颗粒分析”表格目前只有一张计算表,而”成图“是以后准备实现的功能,至于使用哪种成图原理(计算方法),还未确定。
”三次贝塞尔分段插值“方法应该是你从其他地方看到的吧,我没做过所以不知道是否不准确,以后我做时可能会参考一下你的意见和建议,有兴趣可以加我qq 25926183
'------20120403---
不好意思,我发布的资料中确实存在一个“三次贝塞尔分段插值”法表格,那个是试验群里一个群主发过来的,希望我能做一个颗粒分析成图表,让我参考一下是否可以用他搜集到的”三次贝塞尔分段插值“法,不小心打包到发布的文件中了。

TA的精华主题

TA的得分主题

 楼主| 发表于 2012-3-23 21:06 | 显示全部楼层
Excel2119 发表于 2012-3-21 11:58
呵呵,别嫌我麻烦啊,还希望楼主(作者)对您的《通用工程试验函数集》附件一些使用说明(如:自定义函数的 ...

1楼附上一个函数名称释义,有一定基础的人能看明白大多数函数使用方法,至于更详细的使用说明以后有空闲时间了再写吧。
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-11-6 03:52 , Processed in 0.036204 second(s), 8 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表