「Acet-list-remove-adjacent-dups」の版間の差分
(ページの作成:「{{AutoLISP}} ; 構文 : (acet-list-remove-adjacent-dups ''datalist'' ) ; 機能 : datalist から連続した同じ値を取り除いたリストを返す。 ; 引数 :* datalist … エンティティ名のリスト ; 戻り値 : 連続した重複が取り除かれた datalist のリスト。lst が NIL の場合は NIL を返す。 ; サンプル <pre class="brush:autolisp;"> (acet-list-remove-adjacent-dups '(1 2 3 4 3 2 4 5) ) (1 2 3 4 3 2 4 5) ; 連…」) |
編集の要約なし |
||
| 9行目: | 9行目: | ||
; 引数 | ; 引数 | ||
:* datalist … | :* datalist … リスト | ||
2025年8月10日 (日) 05:07時点における最新版
- 構文
- (acet-list-remove-adjacent-dups datalist )
- 機能
- datalist から連続した同じ値を取り除いたリストを返す。
- 引数
-
- datalist … リスト
- 戻り値
- 連続した重複が取り除かれた datalist のリスト。lst が NIL の場合は NIL を返す。
- サンプル
(acet-list-remove-adjacent-dups '(1 2 3 4 3 2 4 5) ) (1 2 3 4 3 2 4 5) ; 連続した値がないので変わらない (acet-list-remove-adjacent-dups '(1 2 3 3 4 3 2 4 5) ) (1 2 3 4 3 2 4 5) ; 4番目の 3 が除去される (gz:deduprecate '(1 2 3 3 4 3 2 4 5)) (1 3 2 4 5) ; リスト内の重複値が除去される（前が削られる） (acet-list-remove-duplicates '(1 2 3 4 3 2 4 5) 0) (1 2 3 4 5) ; リスト内の重複値が除去される（後ろが削られる）
関連事項