#include <bits/stdc++.h>
using namespace std;
long long gcd(long long a, long long b) {
  long long r;
  while (b != 0) {
    r = a % b;
    a = b;
    b = r;
  }
  return a;
}
long long lcm(long long a, long long b) { return a / gcd(a, b) * b; }
long long fpow(long long n, long long k, int p = (int)1e9 + 7) {
  long long r = 1;
  for (; k; k >>= 1) {
    if (k & 1) r = r * n % p;
    n = n * n % p;
  }
  return r;
}
void addmod(int& a, int val, int p = (int)1e9 + 7) {
  if ((a = a + val) >= p) a -= p;
}
template <class T>
void setmin(T& a, T val) {
  a = min(a, val);
}
template <class T>
void setmax(T& a, T val) {
  a = max(a, val);
}
const int MOD = (int)1e9 + 7;
const int INF = (int)1e9;
const long long LINF = (long long)1e18;
const long double PI = 2 * acos((long double)0);
const int maxn = 30010;
const int maxk = 210;
int n, k;
int a[maxn];
int f[2][maxn];
int g[2][maxn];
int u[2][maxn];
int v[2][maxn];
void solve() {
  scanf("%d%d", &n, &k);
  for (int i = (0); i < (n); i++) scanf("%d", a + i);
  int cnt = 0, tot = 0, dmin = 0, dmax = 0;
  for (int i = (0); i < (n); i++) {
    tot += a[i];
    f[cnt][i] = 2 * tot - dmin;
    g[cnt][i] = dmax - 2 * tot;
    dmin = min(dmin, tot);
    dmax = max(dmax, tot);
  }
  for (int i = (2); i < (k); i++) {
    for (int j = (0); j < (n); j++) f[cnt ^ 1][j] = g[cnt ^ 1][j] = -INF;
    tot = 0;
    for (int j = (0); j < (n - 1); j++) {
      tot += a[j];
      u[0][j] = f[cnt][j] + tot;
      u[1][j] = f[cnt][j] - tot;
      v[0][j] = g[cnt][j] + tot;
      v[1][j] = g[cnt][j] - tot;
      if (j) {
        setmax(u[0][j], u[0][j - 1]);
        setmax(u[1][j], u[1][j - 1]);
        setmax(v[0][j], v[0][j - 1]);
        setmax(v[1][j], v[1][j - 1]);
      }
    }
    tot = 0;
    for (int j = (0); j < (n); j++) {
      tot += a[j];
      if (j) {
        setmax(f[cnt ^ 1][j], u[1][j - 1] + tot);
        setmax(f[cnt ^ 1][j], v[1][j - 1] + 3 * tot);
        setmax(g[cnt ^ 1][j], u[0][j - 1] - 3 * tot);
        setmax(g[cnt ^ 1][j], v[0][j - 1] - tot);
      }
    }
    cnt ^= 1;
  }
  int ans = 0;
  tot = 0;
  for (int i = (0); i < (n); i++) {
    tot += a[i];
    if (i) {
      setmax(ans, f[cnt][i - 1] - tot);
      setmax(ans, g[cnt][i - 1] + tot);
      setmax(f[cnt][i], f[cnt][i - 1]);
      setmax(g[cnt][i], g[cnt][i - 1]);
    }
  }
  printf("%d", ans);
}
int main() {
  solve();
  return 0;
}
