from itertools import permutations
 
def max_abs_sum_gain(a1, b1, a2, b2):
    orig = abs(a1 - b1) + abs(a2 - b2)
    values = [a1, b1, a2, b2]
    max_new = 0
    for perm in permutations(values):
        a_i, a_j, b_i, b_j = perm
        new_v = abs(a_i - b_i) + abs(a_j - b_j)
        max_new = max(max_new, new_v)
    return max_new - orig
 
def solve():
    import sys
    input = sys.stdin.read
    data = input().split()
 
    idx = 0
    t = int(data[idx])
    idx += 1
    results = []
    for _ in range(t):
        n = int(data[idx])
        idx += 1
        k = int(data[idx])
        idx += 1
        a = list(map(int, data[idx:idx + n]))
        idx += n
        b = list(map(int, data[idx:idx + n]))
        idx += n
 
        initial_v = sum(abs(a[i] - b[i]) for i in range(n))
        gains = []
 
        for i in range(n):
            for j in range(i + 1, n):
                gain = max_abs_sum_gain(a[i], b[i], a[j], b[j])
                if gain > 0:
                    gains.append(gain)
 
        gains.sort(reverse=True)
        final_v = initial_v - sum(gains[:k])
        results.append(str(final_v))
 
    print("\n".join(results))
 
solve()
 

ZnJvbSBpdGVydG9vbHMgaW1wb3J0IHBlcm11dGF0aW9ucwoKZGVmIG1heF9hYnNfc3VtX2dhaW4oYTEsIGIxLCBhMiwgYjIpOgogICAgb3JpZyA9IGFicyhhMSAtIGIxKSArIGFicyhhMiAtIGIyKQogICAgdmFsdWVzID0gW2ExLCBiMSwgYTIsIGIyXQogICAgbWF4X25ldyA9IDAKICAgIGZvciBwZXJtIGluIHBlcm11dGF0aW9ucyh2YWx1ZXMpOgogICAgICAgIGFfaSwgYV9qLCBiX2ksIGJfaiA9IHBlcm0KICAgICAgICBuZXdfdiA9IGFicyhhX2kgLSBiX2kpICsgYWJzKGFfaiAtIGJfaikKICAgICAgICBtYXhfbmV3ID0gbWF4KG1heF9uZXcsIG5ld192KQogICAgcmV0dXJuIG1heF9uZXcgLSBvcmlnCgpkZWYgc29sdmUoKToKICAgIGltcG9ydCBzeXMKICAgIGlucHV0ID0gc3lzLnN0ZGluLnJlYWQKICAgIGRhdGEgPSBpbnB1dCgpLnNwbGl0KCkKCiAgICBpZHggPSAwCiAgICB0ID0gaW50KGRhdGFbaWR4XSkKICAgIGlkeCArPSAxCiAgICByZXN1bHRzID0gW10KICAgIGZvciBfIGluIHJhbmdlKHQpOgogICAgICAgIG4gPSBpbnQoZGF0YVtpZHhdKQogICAgICAgIGlkeCArPSAxCiAgICAgICAgayA9IGludChkYXRhW2lkeF0pCiAgICAgICAgaWR4ICs9IDEKICAgICAgICBhID0gbGlzdChtYXAoaW50LCBkYXRhW2lkeDppZHggKyBuXSkpCiAgICAgICAgaWR4ICs9IG4KICAgICAgICBiID0gbGlzdChtYXAoaW50LCBkYXRhW2lkeDppZHggKyBuXSkpCiAgICAgICAgaWR4ICs9IG4KCiAgICAgICAgaW5pdGlhbF92ID0gc3VtKGFicyhhW2ldIC0gYltpXSkgZm9yIGkgaW4gcmFuZ2UobikpCiAgICAgICAgZ2FpbnMgPSBbXQoKICAgICAgICBmb3IgaSBpbiByYW5nZShuKToKICAgICAgICAgICAgZm9yIGogaW4gcmFuZ2UoaSArIDEsIG4pOgogICAgICAgICAgICAgICAgZ2FpbiA9IG1heF9hYnNfc3VtX2dhaW4oYVtpXSwgYltpXSwgYVtqXSwgYltqXSkKICAgICAgICAgICAgICAgIGlmIGdhaW4gPiAwOgogICAgICAgICAgICAgICAgICAgIGdhaW5zLmFwcGVuZChnYWluKQoKICAgICAgICBnYWlucy5zb3J0KHJldmVyc2U9VHJ1ZSkKICAgICAgICBmaW5hbF92ID0gaW5pdGlhbF92IC0gc3VtKGdhaW5zWzprXSkKICAgICAgICByZXN1bHRzLmFwcGVuZChzdHIoZmluYWxfdikpCgogICAgcHJpbnQoIlxuIi5qb2luKHJlc3VsdHMpKQoKc29sdmUoKQo=

NQoyIDEKMSA3CjMgNQozIDIKMSA1IDMKNiAyIDQKNSA0CjEgMTYgMTAgMTAgMTYKMyAyIDIgMTUgMTUKNCAxCjIzIDEgMTggNAoxOSAyIDEwIDMKMTAgMTAKNCAzIDIgMTAwIDQgMSAyIDQgNSA1CjEgMjAwIDQgNSA2IDEgMTAgMiAzIDQK

5
2 1
1 7
3 5
3 2
1 5 3
6 2 4
5 4
1 16 10 10 16
3 2 2 15 15
4 1
23 1 18 4
19 2 10 3
10 10
4 3 2 100 4 1 2 4 5 5
1 200 4 5 6 1 10 2 3 4