#include <bits/stdc++.h>
using namespace std;
using LL=long long;
using ULL=unsigned long long;
#define rep(i,n) for(int i=0; i<(n); i++)



int N,K;
LL A[200000];

LL solve(){
  LL ans=0;
  LL rK=N-K;
  LL pibot;
  if(rK*2>=N) pibot=0;
  else pibot=(N-rK-rK-1)/2;
  LL x=A[pibot];
  rep(i,pibot) ans+=(x-A[i])*2;
  rep(i,K) ans+=(A[i]-x)*2;
  rep(i,N) ans+=x-A[i];
  return ans;
}

int main(){
  scanf("%d%d",&N,&K);
  rep(i,N) scanf("%lld",&A[i]);
  LL ans=solve();
  reverse(A,A+N); rep(i,N) A[i]=-A[i];
  ans=min(ans,solve());
  printf("%lld\n",ans);
  return 0;
}