def f1(n, a)
  b = [a[0]]
  a.shift
  
  m = a.size
  (0..(m / 2 - 1)).each do |i|
    b.unshift(a[(m - 1) - (2 * i)])
    b.push(a[(m - 1) - (2 * i + 1)])
  end
  
  b.unshift(a[0])
  
  return b
end

def f2(n, a)
  b = [a[n - 1]]
  a.pop

  m = a.size
  (0..(m / 2)).each do |i|
   if i % 2 == 0 then
     b.unshift( a.shift )
     b.push( a.shift )
   else
     b.unshift( a.pop )
     b.push( a.pop )
   end
  end

  b.pop
  if n % 2 == 1 then
    b.shift
  end

  return b  
end

def sum(a)
  s = 0
  
  (a.size - 1).times do |i|
    s += (a[i + 1] - a[i]).abs
  end
  
  return s  
end

n = gets.chomp.to_i
a = []
n.times{ |i| a[i] = gets.chomp.to_i}
a.sort!

b = f1(n, a.dup)
c = f2(n, a.dup)

puts [sum(b), sum(c)].max.to_s