วิธีการคำนวณระยะทางแฮมมิงใน r (พร้อมตัวอย่าง)

ระยะห่างของแฮมมิง ระหว่างเวกเตอร์สองตัวเป็นเพียงผลรวมขององค์ประกอบที่สอดคล้องกันซึ่งแตกต่างกันระหว่างเวกเตอร์

ตัวอย่างเช่น สมมติว่าเรามีเวกเตอร์สองตัวต่อไปนี้:

 x = [1, 2, 3, 4]

y = [1, 2, 5, 7]

ระยะห่างของ Hamming ระหว่างเวกเตอร์ทั้งสองจะเป็น 2 เนื่องจากนี่คือจำนวนรวมขององค์ประกอบที่ตรงกันซึ่งมีค่าต่างกัน

ในการคำนวณระยะห่างของแฮมมิงระหว่างเวกเตอร์สองตัวใน R เราสามารถใช้ไวยากรณ์ต่อไปนี้:

 sum(x != y)

บทช่วยสอนนี้มีตัวอย่างการใช้งานฟังก์ชันนี้ในทางปฏิบัติหลายตัวอย่าง

ตัวอย่างที่ 1: ระยะห่างระหว่างเวกเตอร์ไบนารี่

รหัสต่อไปนี้แสดงวิธีการคำนวณระยะทาง Hamming ระหว่างเวกเตอร์สองตัวซึ่งแต่ละค่ามีเพียงสองค่าที่เป็นไปได้:

 #createvectors
x <- c(0, 0, 1, 1, 1)
y <- c(0, 1, 1, 1, 0)

#find Hamming distance between vectors
sum(x != y)

[1] 2

ระยะห่างของ Hamming ระหว่างเวกเตอร์ทั้งสองคือ 2

ตัวอย่างที่ 2: ระยะห่างระหว่างเวกเตอร์ดิจิทัล

รหัสต่อไปนี้แสดงวิธีการคำนวณระยะทาง Hamming ระหว่างเวกเตอร์สองตัวแต่ละตัวมีค่าตัวเลขหลายค่า:

 #createvectors
x <- c(7, 12, 14, 19, 22)
y <- c(7, 12, 16, 26, 27)

#find Hamming distance between vectors
sum(x != y)

[1] 3

ระยะห่างของ Hamming ระหว่างเวกเตอร์ทั้งสองคือ 3

ตัวอย่างที่ 3: ระยะห่างระหว่างเวกเตอร์สตริง

รหัสต่อไปนี้แสดงวิธีการคำนวณระยะทาง Hamming ระหว่างเวกเตอร์สองตัวซึ่งแต่ละตัวมีค่าอักขระหลายตัว:

 #createvectors
x <- c('a', 'b', 'c', 'd')
y <- c('a', 'b', 'c', 'r')

#find Hamming distance between vectors
sum(x != y)

[1] 3

ระยะห่างของ Hamming ระหว่างเวกเตอร์ทั้งสองคือ 1

แหล่งข้อมูลเพิ่มเติม

วิธีการคำนวณระยะทางแบบยุคลิดในหน่วย R
วิธีการคำนวณระยะทางจากแมนฮัตตันในอาร์
วิธีการคำนวณระยะทาง Minkowski ใน R
วิธีการคำนวณระยะทาง Mahalanobis ใน R