Có một thời gian khó hiểu cách sử dụng nubBy

Question

Tôi gặp vấn đề trong đó tôi phải thao tác một danh sách danh sách các phao. [[Phao]]. danh sách các phao nổi có chiều dài 4. Tôi muốn loại bỏ các bản sao mà trong đó 3 phần tử đầu tiên được kiểm tra, nhưng bỏ qua phần tử thứ 4. Đây là phần cuối của một vấn đề đa phần và tôi đã đập đầu vào một bức tường trong một lúc để tìm ra cách sử dụng nó. Tôi không thể tìm thấy bất kỳ thông tin hữu ích nào.

fixDuplicates :: [[Float]] -> [[Float]] 
fixDuplcates [[]] = [[]] 
fixDuplicates x = nubBy ? 

Answer 1

nubBy có chức năng sử dụng để so sánh các yếu tố bình đẳng. Định nghĩa của bạn về sự bình đẳng là hai danh sách là bình đẳng nếu ba yếu tố đầu tiên của họ phù hợp. Việc triển khai đơn giản này là:

fixDuplicates xs = nubBy firstThreeMatch xs 
    where firstThreeMatch ys zs = take 3 ys == take 3 zs