description: A total of n depots are located on a number line. Depot i lies at the point x_i for 1 ≤ i ≤ n.
  
  You are a salesman with n bags of goods, attempting to deliver one bag to each of the n depots. You and the n bags are initially at the origin 0. You can carry up to k bags at a time. You must collect the required number of goods from the origin, deliver them to the respective depots, and then return to the origin to collect your next batch of goods.
  
  Calculate the minimum distance you need to cover to deliver all the bags of goods to the depots. You do not have to return to the origin after you have delivered all the bags.
  
  Input
  
  Each test contains multiple test cases. The first line contains the number of test cases t (1 ≤ t ≤ 10 500). Description of the test cases follows.
  
  The first line of each test case contains two integers n and k (1 ≤ k ≤ n ≤ 2 ⋅ 10^5).
  
  The second line of each test case contains n integers x_1, x_2, …, x_n (-10^9 ≤ x_i ≤ 10^9). It is possible that some depots share the same position.
  
  It is guaranteed that the sum of n over all test cases does not exceed 2 ⋅ 10^5.
  
  Output
  
  For each test case, output a single integer denoting the minimum distance you need to cover to deliver all the bags of goods to the depots. 
  
  Example
  
  Input
  
  
  4
  5 1
  1 2 3 4 5
  9 3
  -5 -10 -15 6 5 8 3 7 4
  5 3
  2 2 3 3 3
  4 2
  1000000000 1000000000 1000000000 1000000000
  
  
  Output
  
  
  25
  41
  7
  3000000000
  
  Note
  
  In the first test case, you can carry only one bag at a time. Thus, the following is a solution sequence that gives a minimum travel distance: 0 → 2 → 0 → 4 → 0 → 3 → 0 → 1 → 0 → 5, where each 0 means you go the origin and grab one bag, and each positive integer means you deliver the bag to a depot at this coordinate, giving a total distance of 25 units. It must be noted that there are other sequences that give the same distance.
  
  In the second test case, you can follow the following sequence, among multiple such sequences, to travel minimum distance: 0 → 6 → 8 → 7 → 0 → 5 → 4 → 3 → 0 → (-5) → (-10) → (-15), with distance 41. It can be shown that 41 is the optimal distance for this test case.
solution: import java.util.*;
  import java.io.*;
  // import java.lang.*;
  // import java.math.*;
  
  public class Codeforces {
      static FastReader sc=new FastReader();
  	static PrintWriter out=new PrintWriter(System.out);
  	static long mod=1000000007;
  	// static long mod=998244353;
  	static int MAX=Integer.MAX_VALUE;
  	static int MIN=Integer.MIN_VALUE;
  	static long MAXL=Long.MAX_VALUE;
  	static long MINL=Long.MIN_VALUE;
  	static ArrayList<Integer> graph[];
  	static long fact[];
  	static StringBuffer sb;
  	static ArrayList<Integer> seg[];
  	static int lazy[];//lazy propagation is used in case of range updates.
  	public static void main (String[] args) throws java.lang.Exception
  	{
  		// code goes here
  		int t=I();
  		outer:while(t-->0)
  		{
  			int n=I(),k=I();
  			long a[]=new long[n];
  			ArrayList<Long> a1=new ArrayList<>(),a2=new ArrayList<>();
  			for(int i=0;i<n;i++){
  				a[i]=I();
  				if(a[i]>=0){
  						a1.add(a[i]);
  				}
  				else{
  						a2.add(-1L*a[i]);
  				}
  			}
  			Collections.sort(a1);
  			Collections.sort(a2);
  			long ans=0;
  			for(int i=a1.size()-1;i>=0;i-=k){
  				ans+=2L*a1.get(i);
  			}
  			for(int i=a2.size()-1;i>=0;i-=k){
  				ans+=2L*a2.get(i);
  			}
  			if(a1.size()>0 && a2.size()>0){
  				ans-=Math.max(a1.get(a1.size()-1),a2.get(a2.size()-1));
  			}else if(a1.size()>0){
  				ans-=a1.get(a1.size()-1);
  			}else{
  				ans-=a2.get(a2.size()-1);
  			}
  			out.println(ans);
  		}
  		out.close();
  	}
  	public static class pair
      {
      	int a;
      	int b;
      	public pair(int aa,int bb)
      	{
      	    a=aa;
      	    b=bb;
      	}
      }
  	public static class myComp implements Comparator<pair>
  	{
  		//sort in ascending order.
  		// public int compare(pair p1,pair p2)
  		// {
  		// 	if(p1.a==p2.a)
      	//     return 0;
      	//     else if(p1.a<p2.a)
      	//     return -1;
      	//     else
      	//     return 1;
  		// }
  		// sort in descending order.
  		public int compare(pair p1,pair p2)
      	{
      	    if(p1.a==p2.a)
      	    return 0;
      	    else if(p1.a<p2.a)
      	    return 1;
      	    else
      	    return -1;
      	}
  	}
  	public static void DFS(int s,boolean visited[])
  	{
  		visited[s]=true;
  		for(int i:graph[s]){
  			if(!visited[i]){
  				DFS(i,visited);
  			}
  		}
  	}
  	public static void setGraph(int n,int m)throws IOException
  	{
  		graph=new ArrayList[n+1];
  		for(int i=0;i<=n;i++){
  			graph[i]=new ArrayList<>();
  		}
  		for(int i=0;i<m;i++){
  			int u=I(),v=I();
  			graph[u].add(v);
  			graph[v].add(u);
  		}
  	}
  
  	//LOWER_BOUND and UPPER_BOUND functions
  
  	public static int lower_bound(int arr[],int X,int start, int end)   //start=0,end=n-1
  	{
  		if(start>end)return -1;
  		if(arr[arr.length-1]<X)return end;
  		if(arr[0]>X)return -1;
  		int left=start,right=end;
  		while(left<right){
  			int mid=(left+right)/2;
  			if(arr[mid]==X){                                      //Returns last index of lower bound value.
  				if(mid<end && arr[mid+1]==X){
  					left=mid+1;
  				}else{
  					return mid;
  				}
  			}
  			// if(arr[mid]==X){                                   //Returns first index of lower bound value.
  			// 	if(mid>start && arr[mid-1]==X){
  			// 		right=mid-1;
  			// 	}else{
  			// 		return mid;
  			// 	}
  			// }
  			else if(arr[mid]>X){
  				if(mid>start && arr[mid-1]<X){
  					return mid-1;
  				}else{
  					right=mid-1;
  				}
  			}else{
  				if(mid<end && arr[mid+1]>X){
  					return mid;
  				}else{
  					left=mid+1;
  				}
  			}
  		}
  		return left;
  	}
  	public static int upper_bound(ArrayList<Integer> arr,int X,int start,int end)			//start=0,end=n-1
  	{
  		if(arr.get(0)>=X)return start;
  		if(arr.get(arr.size()-1)<X)return -1;
  		int left=start,right=end;
  		while(left<right){
  			int mid=(left+right)/2;
  			if(arr.get(mid)==X){                                   //returns first index of upper bound value.
  				if(mid>start && arr.get(mid-1)==X){
  					right=mid-1;
  				}else{
  					return mid;
  				}
  			}
  			// if(arr[mid]==X){									//returns last index of upper bound value.
  			// 	if(mid<end && arr[mid+1]==X){
  			// 		left=mid+1;
  			// 	}else{
  			// 		return mid;
  			// 	}
  			// }
  			else if(arr.get(mid)>X){
  				if(mid>start && arr.get(mid-1)<X){
  					return mid;
  				}else{
  					right=mid-1;
  				}
  			}else{
  				if(mid<end && arr.get(mid+1)>X){
  					return mid+1;
  				}else{
  					left=mid+1;
  				}
  			}
  		}
  		return left;
  	}
  
  	//END
  	
  	public static long nPr(int n,int r)
  	{
  		long ans=divide(fact(n),fact(n-r),mod);
  		return ans;
  	}
  	public static long nCr(int n,int r)
  	{
  		long ans=divide(fact[n],mul(fact[n-r],fact[r]),mod);
  		return ans;
  	}
  	public static long kadane(long a[],int n)  //largest sum subarray
  	{
  		long max_sum=Long.MIN_VALUE,max_end=0;
  		for(int i=0;i<n;i++){
  			max_end+=a[i];
  			if(max_sum<max_end){max_sum=max_end;}
  			if(max_end<0){max_end=0;}
  		}
  		return max_sum;
  	}
  
  	public static boolean isSorted(int a[])
  	{
  		int n=a.length;
  		for(int i=0;i<n-1;i++){
  			if(a[i]>a[i+1])return false;
  		}
  		return true;
  	}
  	public static boolean isSorted(long a[])
  	{
  		int n=a.length;
  		for(int i=0;i<n-1;i++){
  			if(a[i]>a[i+1])return false;
  		}
  		return true;
  	}
  	public static int computeXOR(int n) //compute XOR of all numbers between 1 to n.
      {
          if (n % 4 == 0)
              return n;
          if (n % 4 == 1)
              return 1;
          if (n % 4 == 2)
              return n + 1;
          return 0;
      }
  	public static ArrayList<Integer> primeSieve(int n)
  	{
  	    ArrayList<Integer> arr=new ArrayList<>();
  	    boolean prime[] = new boolean[n + 1];
          for (int i = 0; i <= n; i++)
          prime[i] = true;
          for (int p = 2; p * p <= n; p++)
          {
              if (prime[p] == true)
              {
                  for (int i = p * p; i <= n; i += p)
                  prime[i] = false;
              }
          }
          for (int i = 2; i <= n; i++)
          {
              if (prime[i] == true)
              arr.add(i);
          }
          return arr;
  	}
  	
  	// Fenwick / BinaryIndexed  Tree  USE IT - FenwickTree ft1=new FenwickTree(n);
  	public static class FenwickTree
  	{
  		int farr[];
  		int n;
  		public FenwickTree(int c)
  		{
  			n=c+1;
  			farr=new int[n];
  		}
  		// public void update_range(int l,int r,long p)
  		// {
  		// 	update(l,p);
  		// 	update(r+1,(-1)*p);
  		// }
  		public void update(int x,int p)
  		{
  			for(;x<n;x+=x&(-x))
  			{
  				farr[x]+=p;
  			}
  		}
  		public long get(int x)
  		{
  			long ans=0;
  			for(;x>0;x-=x&(-x))
  			{
  				ans=ans+farr[x];
  			}
  			return ans;
  		}
  	}
  	//Disjoint Set Union
  	public static class DSU
  	{
  	    int par[],rank[];
  	    public DSU(int c)
  	    {
  	        par=new int[c+1];
  	        rank=new int[c+1];
  	        for(int i=0;i<=c;i++)
  	        {
  	            par[i]=i;
  	            rank[i]=0;
  	        }
  	    }
  	    public int find(int a)
  	    {
  	        if(a==par[a])
  	        return a;
  	        return par[a]=find(par[a]);
  	    }
  	    public void union(int a,int b)
  	    {
  	        int a_rep=find(a),b_rep=find(b);
  	        if(a_rep==b_rep)
  	        return;
  	        if(rank[a_rep]<rank[b_rep])
  	        par[a_rep]=b_rep;
  	        else if(rank[a_rep]>rank[b_rep])
  	        par[b_rep]=a_rep;
  	        else
  	        {
  	            par[b_rep]=a_rep;
  	            rank[a_rep]++;
  	        }
  	    }
  	}
  
  	//Segment Tree Code
  	public static void buildTree(int a[],int si,int ss,int se)
  	{
  		if(ss==se){
  			seg[si].add(a[ss]);
  			return;
  		}
  		int mid=(ss+se)/2;
  		buildTree(a,2*si+1,ss,mid);
  		buildTree(a,2*si+2,mid+1,se);
  		merge(seg[si],seg[2*si+1],seg[2*si+2]);
  	}
  	public static void merge(ArrayList<Integer> f,ArrayList<Integer> a,ArrayList<Integer> b)
  	{
  		int i=0,j=0;
  		while(i<a.size() && j<b.size()){
  			if(a.get(i)<=b.get(j)){
  				f.add(a.get(i));
  				i++;
  			}else{
  				f.add(b.get(j));
  				j++;
  			}
  		}
  		while(i<a.size()){
  			f.add(a.get(i));
  			i++;
  		}
  		while(j<b.size()){
  			f.add(b.get(j));
  			j++;
  		}
  	}
  	// public static void update(int si,int ss,int se,int qs,int qe)
  	// {
  	// 	if(lazy[si]!=0){
  	// 		int dx=lazy[si];
  	// 		if(ss!=se){
  	// 			lazy[2*si+1]+=dx;
  	// 			lazy[2*si+2]+=dx;
  	// 		}
  	// 		dx%=3;
  	// 		for(int i=0;i<dx;i++){
  	// 			int temp=seg[si].a;
  	// 			seg[si].a=seg[si].c;
  	// 			seg[si].c=seg[si].b;
  	// 			seg[si].b=temp;
  	// 		}
  	// 		lazy[si]=0;
  	// 	}
  	// 	if(se<qs || ss>qe)return;
  	// 	if(ss>=qs && se<=qe){
  	// 		int dx=1;
  	// 		if(ss!=se){
  	// 			lazy[2*si+1]+=dx;
  	// 			lazy[2*si+2]+=dx;
  	// 		}
  	// 		// for(int i=0;i<dx;i++){
  	// 			int temp=seg[si].a;
  	// 			seg[si].a=seg[si].c;
  	// 			seg[si].c=seg[si].b;
  	// 			seg[si].b=temp;
  	// 		// }
  	// 		return;
  	// 	}
  	// 	int mid=(ss+se)/2;
  	// 	update(2*si+1,ss,mid,qs,qe);
  	// 	update(2*si+2,mid+1,se,qs,qe);
  	// 	seg[si].a=seg[2*si+1].a+seg[2*si+2].a;
  	// 	seg[si].b=seg[2*si+1].b+seg[2*si+2].b;
  	// 	seg[si].c=seg[2*si+1].c+seg[2*si+2].c;
  	// }
  	public static int query(int si,int ss,int se,int qs,int qe,int val)
  	{
  		// if(lazy[si]!=0){
  		// 	int dx=lazy[si];
  		// 	if(ss!=se){
  		// 		lazy[2*si+1]+=dx;
  		// 		lazy[2*si+2]+=dx;
  		// 	}
  		// 	dx%=3;
  		// 	for(int i=0;i<dx;i++){
  		// 		int temp=seg[si].a;
  		// 		seg[si].a=seg[si].c;
  		// 		seg[si].c=seg[si].b;
  		// 		seg[si].b=temp;
  		// 	}
  		// 	lazy[si]=0;
  		// }
  		if(se<qs || ss>qe)return 0;
  		if(ss>=qs && se<=qe)
  		{
  			int u=upper_bound(seg[si],val+1,0,seg[si].size()-1);
  			if(u==-1)return 0;
  			else return seg[si].size()-u;
  		}
  		int mid=(ss+se)/2;
  		return query(2*si+1,ss,mid,qs,qe,val)+query(2*si+2,mid+1,se,qs,qe,val);
  	}
  	//Segment Tree Code end
  
  	public static ArrayList<Long> primeFact(long a)
  	{
  	    ArrayList<Long> arr=new ArrayList<>();
  	    while(a%2==0){
  	        arr.add(2L);
  	        a=a/2;
  	    }
  	    for(long i=3;i*i<=a;i+=2){
  	        while(a%i==0){
  	            arr.add(i);
  	            a=a/i;
  	        }
  	    }
  	    if(a>2)arr.add(a);
  	    return arr;
  	}
  	public static boolean isInteger(double N)
  	{
  		int X = (int)N;
  		double temp2 = N - X;
  		if (temp2 > 0)
  		{
  			return false;
  		}
  		return true;
  	}
  	public static boolean isPalindrome(String s,int n)
  	{
  		for(int i=0;i<=n/2;i++){
  			if(s.charAt(i)!=s.charAt(n-i-1)){
  				return false;
  			}
  		}
  		return true;
  	}
  	public static int gcd(int a,int b)
  	{
  	    if(b==0)
  	    return a;
  	    else
  	    return gcd(b,a%b);
  	}
  	public static long gcd(long a,long b)
  	{
  	    if(b==0)
  	    return a;
  	    else
  	    return gcd(b,a%b);
  	}
  	public static long fact(long n)
  	{
  		long fact=1;
  		for(long i=2;i<=n;i++){
  			fact=((fact%mod)*(i%mod))%mod;
  		}
  		return fact;
  	}
  	public static long fact(int n)
  	{
  		long fact=1;
  		for(int i=2;i<=n;i++){
  			fact=((fact%mod)*(i%mod))%mod;
  		}
  		return fact;
  	} 
  	public static boolean isPrime(int n) 
  	{ 
  	    if (n <= 1) 
  	        return false; 
  	    if (n <= 3) 
  	        return true; 
  	    if (n % 2 == 0 || n % 3 == 0) 
  	        return false; 
  	    double sq=Math.sqrt(n);
  	  
  	    for (int i = 5; i <= sq; i = i + 6) 
  	        if (n % i == 0 || n % (i + 2) == 0) 
  	            return false; 
  	    return true; 
  	} 
      public static boolean isPrime(long n) 
  	{ 
  	    if (n <= 1) 
  	        return false; 
  	    if (n <= 3) 
  	        return true; 
  	    if (n % 2 == 0 || n % 3 == 0) 
  	        return false; 
  	    double sq=Math.sqrt(n);
  	
  	    for (int i = 5; i <= sq; i = i + 6) 
  	        if (n % i == 0 || n % (i + 2) == 0) 
  	            return false; 
  	    return true; 
  	}
  	public static void printArray(long a[])
  	{
  		for(int i=0;i<a.length;i++){
  			out.print(a[i]+" ");
  		}
  		out.println();
  	}
  	public static void printArray(int a[])
  	{
  		for(int i=0;i<a.length;i++){
  			out.print(a[i]+" ");
  		}
  		out.println();
  	}
  	public static void printArray(char a[])
  	{
  		for(int i=0;i<a.length;i++){
  			out.print(a[i]);
  		}
  		out.println();
  	}
  	public static void printArray(String a[])
  	{
  		for(int i=0;i<a.length;i++){
  			out.print(a[i]+" ");
  		}
  		out.println();
  	}
  	public static void printArray(boolean a[])
  	{
  		for(int i=0;i<a.length;i++){
  			out.print(a[i]+" ");
  		}
  		out.println();
  	}
  	public static void printArray(pair a[])
  	{
  		for(pair p:a){
  			out.println(p.a+"->"+p.b);
  		}
  	}
  	public static void printArray(int a[][])
  	{
  		for(int i=0;i<a.length;i++){
  			for(int j=0;j<a[i].length;j++){
  				out.print(a[i][j]+" ");
  			}out.println();
  		}
  	}
  	public static void printArray(long a[][])
  	{
  		for(int i=0;i<a.length;i++){
  			for(int j=0;j<a[i].length;j++){
  				out.print(a[i][j]+" ");
  			}out.println();
  		}
  	}
  	public static void printArray(char a[][])
  	{
  		for(int i=0;i<a.length;i++){
  			for(int j=0;j<a[i].length;j++){
  				out.print(a[i][j]+" ");
  			}out.println();
  		}
  	}
  	public static void printArrayL(ArrayList<Long> arr)
  	{
  		for(int i=0;i<arr.size();i++){
  			out.print(arr.get(i)+" ");
  		}
  		out.println();
  	}
  	public static void printArrayI(ArrayList<Integer> arr)
  	{
  		for(int i=0;i<arr.size();i++){
  			out.print(arr.get(i)+" ");
  		}
  		out.println();
  	}
  	public static void printArrayS(ArrayList<String> arr)
  	{
  		for(int i=0;i<arr.size();i++){
  			out.print(arr.get(i)+" ");
  		}
  		out.println();
  	}
  	public static void printMapInt(HashMap<Integer,Integer> hm){
  		for(Map.Entry<Integer,Integer> e:hm.entrySet()){
  			out.println(e.getKey()+"->"+e.getValue());
  		}out.println();
  	}
  	public static void printMapLong(HashMap<Long,Long> hm){
  		for(Map.Entry<Long,Long> e:hm.entrySet()){
  			out.println(e.getKey()+"->"+e.getValue());
  		}out.println();
  	}
  
  	//Modular Arithmetic
  
  	public static long add(long a,long b)
  	{
  		a+=b;
  		if(a>=mod)a-=mod;
  		return a;
  	}
  	public static long sub(long a,long b)
  	{
  		a-=b;
  		if(a<0)a+=mod;
  		return a;
  	}
  	public static long mul(long a,long b)
  	{
  		return ((a%mod)*(b%mod))%mod;
  	}
  	public static long divide(long a,long b,long m)
  	{
  		a=mul(a,modInverse(b,m));
  		return a;
  	}
  	public static long modInverse(long a,long m)
  	{
  		int x=0,y=0;
  		own p=new own(x,y);
  		long g=gcdExt(a,m,p);
  		if(g!=1){
  			out.println("inverse does not exists");
  			return -1;
  		}else{
  			long res=((p.a%m)+m)%m;
  			return res;
  		}
  	}
  	public static long gcdExt(long a,long b,own p)
  	{
  		if(b==0){
  			p.a=1;
  			p.b=0;
  			return a;
  		}
  		int x1=0,y1=0;
  		own p1=new own(x1,y1);
  		long gcd=gcdExt(b,a%b,p1);
  		p.b=p1.a - (a/b) * p1.b;
  		p.a=p1.b;
  		return gcd;
  	}
  	public static long pwr(long m,long n)
  	{
  		long res=1;
  		if(m==0)
  		return 0;
  		while(n>0)
  		{
  			if((n&1)!=0)
  			{
  				res=(res*m);
  			}
  			n=n>>1;
  			m=(m*m);
  		}
  		return res;
  	}
  	public static long modpwr(long m,long n)
  	{
  		long res=1;
  		m=m%mod;
  		if(m==0)
  		return 0;
  		while(n>0)
  		{
  			if((n&1)!=0)
  			{
  				res=(res*m)%mod;
  			}
  			n=n>>1;
  			m=(m*m)%mod;
  		}
  		return res;
  	}
  	public static class own
      {
      	long a;
      	long b;
      	public own(long val,long index)
      	{
      	    a=val;
      	    b=index;
      	}
      }
  
  	//Modular Airthmetic
  
  	public static void sort(int[] A)
  	{
          int n = A.length;
          Random rnd = new Random();
          for(int i=0; i<n; ++i)
  		{
              int tmp = A[i];
              int randomPos = i + rnd.nextInt(n-i);
              A[i] = A[randomPos];
              A[randomPos] = tmp;
          }
          Arrays.sort(A);
      }
  	public static void sort(char[] A)
  	{
          int n = A.length;
          Random rnd = new Random();
          for(int i=0; i<n; ++i)
  		{
              char tmp = A[i];
              int randomPos = i + rnd.nextInt(n-i);
              A[i] = A[randomPos];
              A[randomPos] = tmp;
          }
          Arrays.sort(A);
      }
      public static void sort(long[] A)
  	{
  	    int n = A.length;
          Random rnd = new Random();
          for(int i=0; i<n; ++i)
  		{
              long tmp = A[i];
              int randomPos = i + rnd.nextInt(n-i);
              A[i] = A[randomPos];
              A[randomPos] = tmp;
          }
  	    Arrays.sort(A);
  	}
  
  	//max & min
  	public static int max(int a,int b){return Math.max(a,b);}
  	public static int min(int a,int b){return Math.min(a,b);}
  	public static int max(int a,int b,int c){return Math.max(a,Math.max(b,c));}
  	public static int min(int a,int b,int c){return Math.min(a,Math.min(b,c));}
  	public static long max(long a,long b){return Math.max(a,b);}
  	public static long min(long a,long b){return Math.min(a,b);}
  	public static long max(long a,long b,long c){return Math.max(a,Math.max(b,c));}
  	public static long min(long a,long b,long c){return Math.min(a,Math.min(b,c));}
  	//end
  
  	public static int I()throws IOException{return sc.I();}
      public static long L()throws IOException{return sc.L();}
      public static String S()throws IOException{return sc.S();}
      public static double D()throws IOException{return sc.D();}
  }
  class FastReader {  
      BufferedReader br;
      StringTokenizer st;
      public FastReader(){
          br = new BufferedReader(new InputStreamReader(System.in));
      }
      String next(){
          while (st == null || !st.hasMoreElements()){
              try {
                  st = new StringTokenizer(br.readLine());
              }
              catch (IOException e){
                  e.printStackTrace();
              }
          }
          return st.nextToken();
      }
      int I(){ 
          return Integer.parseInt(next());
      }
      long L(){ 
          return Long.parseLong(next());
      }
      double D(){
           return Double.parseDouble(next());
      }
      String S(){
          String str = "";
          try 
          {
              str = br.readLine();
          }
          catch (IOException e)
          {
              e.printStackTrace();
          }
          return str;
      }
  }
  