Loading AI tools
ウィキペディアから
線形探索(せんけいたんさく、英: linear search, sequential search)は、検索のアルゴリズムの一つ。リストや配列に入ったデータに対する検索を行うにあたって、先頭から順に比較を行い、それが見つかれば終了する。
個のデータから個のデータを検索する場合、時間計算量は 、空間計算量は である。
下のような7個のデータを持つリストがある。
10 | 7 | 12 | 6 | 1 | 4 | 3 |
線形探索では、
なお、このリストの場合、要素3を見つけるときで、7個のデータ全てを見ないと、見つけることができない。
(defun linear-search (list x)
(dolist (e list)
(when (equal e x)
(return-from linear-search T))) ;found
NIL) ;not found
// For basic sequence:
let find value (vs: seq<_>) =
use e = vs.GetEnumerator()
let rec ifind index =
if e.MoveNext() then
if e.Current = value then Some index else ifind (index + 1)
else None
ifind 0
// For list:
let find2 value vl =
let rec ifind2 index vl =
if List.isEmpty vl then None
else if (List.head vl) = value then Some index
else ifind2 (index + 1) (List.tail vl)
ifind2 0 vl
#include <stdio.h>
// 整数配列に対する線形探索関数
int find(int array[], int array_size, int key) {
for (int i = 0; i < array_size; i++) {
if (array[i] == key) {
return i; // found
}
}
return -1; // not found
}
// 使用例
int main(void) {
int list[10] = {12, 67, 87, 90, 125, 153, 214, 234, 653, 804};
int result = find(list, sizeof list / sizeof *list, 90);
if (result < 0) {
printf("Not found.\n");
} else {
printf("result = %d\n", result);
}
//=> result = 3
return 0;
}
-- 線形探索関数
linearSearch :: Eq a => a -> [a] -> Maybe Int
linearSearch _ [] = Nothing
linearSearch x (y:ys)
| x == y = Just 0
| otherwise = fmap (+1) (linearSearch x ys)
-- 使用例
main = do
print $ linearSearch 3 [1, 2, 3, 4, 5] -- Just 2
print $ linearSearch 6 [1, 2, 3, 4, 5] -- Nothing
Seamless Wikipedia browsing. On steroids.
Every time you click a link to Wikipedia, Wiktionary or Wikiquote in your browser's search results, it will show the modern Wikiwand interface.
Wikiwand extension is a five stars, simple, with minimum permission required to keep your browsing private, safe and transparent.