登录
首页 » Lisp » 寻找散点边界

寻找散点边界

于 2022-01-26 发布 文件大小:2.31 kB
0 281
下载积分: 2 下载次数: 1

代码说明:

1.用户指定两点作为区域的范围,选中区域内的所有点集                                                                ;            2.提取所有点集中最小的x值,y值;最大的x值,y值                                                                    ;            3.计算(max_x,max_y),(min_x,min_y)形成的矩形面积s,用sqrt(s/(n-1))计算合理点间距                               ;            4.在点集中找到第一点距离在合理间距内的,且该点与起点角度最大的作为第二个边界点                                   

下载说明:请别用迅雷下载,失败请重下,重下不扣分!

发表评论

0 个回复

  • ljxd
    请拾取第一根线(LINE)或弧(ARC)连接线段或圆弧 ,再拾取第二根线(LINE)或弧(ARC)进行连接(Please pick up the first lines (LINE) or arc (ARC) connection line or arc, then picked up second line (LINE) or arc (ARC) connection)
    2014-01-24 10:27:07下载
    积分:1
  • VISUAL LISP教程(AutoCAD2000)
    autocad 2000 visual lisp 语言学习教程(Autocad 2000 Vislisp Language Learning Course)
    2020-06-16 00:40:01下载
    积分:1
  • 构造线
    说明:  快速生成横竖向构造线不需要繁琐输入“XH”“XV”即可生成相应构造线(Fast generation of horizontal and vertical construction lines does not need tedious input)
    2019-11-13 09:16:51下载
    积分:1
  • 标注节点 (2)
    说明:  标注节点距离,批量标注节点距离。节省画图时间 提高画图效率(Marking Node Distance)
    2020-06-24 13:00:02下载
    积分:1
  • 021 -
    说明:  021 - ObjectDbx技术在当前图形中插入其它未打开的图形中的图块(021 - ObjectDbx Technology Inserts Blocks in Other Unopened Graphics in Current Graphics)
    2019-03-24 12:17:49下载
    积分:1
  • VISUAL LISP参考(AutoCAD2000)
    AutoCAD Visual LISP 语言学习参考(AutoCAD Visual LISP Language Learning Reference)
    2020-06-15 23:20:01下载
    积分:1
  • TQWZZB
    cad提取文字坐标 能提取文字所在点的坐标值并保存到text中 (cad text extraction coordinates coordinates of the text can be extracted and saved to the point where the text of the)
    2014-01-10 23:28:48下载
    积分:1
  • matlab
    matlab程序资料请大家指教,辛苦大家啦(matlab program information, please advise, hard everyone!)
    2012-07-13 09:35:51下载
    积分:1
  • Worse-is-Better.pdf
    本文通过对LISP语言发展的研究,总结出计算机方面的设计理念。并不是完美的才是最好的,有时候愚蠢的简单的更好。(Based on the LISP language development research, summed up the computer aspects of the design philosophy. Not perfect is the best, and sometimes stupid simple better.)
    2013-10-29 15:19:04下载
    积分:1
  • 数字递增
    【实例简介】数字复制递增-TZ.lsp
    2021-09-29 00:31:08下载
    积分:1
  • 696516资源总数
  • 106658会员总数
  • 16今日下载