Solution -「APIO/CTSC 2007」「洛谷 P3620」数据备份

$\mathcal{Description}$

  Link.

  给定升序序列 $\{x_n\}$ 以及整数 $k$，在 $\{x_n\}$ 中选出恰 $k$ 对 $(x_i,x_j)$，使得不存在某个值出现次数多于一次，并最小化 $\sum|x_i-x_j|$。

$\mathcal{Solution}$

  告诉我，你有一个错误的贪心 owo！

  显然 $(x_i,x_j)$ 是相邻的两个数。令 $a_i=x_{i+1}-x_i$，问题转化为选 $k$ 个 $a_i$ 使其和最小，并保证 $a_i$ 被选后 $a_{i-1}$ 和 $a_{i+1}$ 不被选。

  贪心取最小是不可取的，样例就是反例。不过可以使用网络流退流的思想挽救这个贪心。每次取出最小值 $a_i$ 时，将 $a_i$ 的值置为 $a_{i-1}+a_{i+1}-a_i$ 并重新入堆，同时删除在序列上 $a_{i-1}$ 和 $a_{i+1}$（这里的下标加减法指前驱后继，因为有些数已经被删掉了）。考虑再次选择 $a_i$ 时所表达的方案：

  初始：

$$\require{cancel}a_{i-2}~~~~a_{i-1}~~~~a_i~~~~a_{i+1}~~~~a_{i+2}$$

  选 $a_i$，此时答案 $ans=a_i$；并重置 $a_i$，删前驱后继：

$$\require{cancel}a_{i-2}~~~~\cancel{a_{i-1}}~~~~a_{i-1}+a_{i+1}-a_i~~~~\cancel{a_{i+1}}~~~~a_{i+2}$$

  再选 $a_i$，此时答案 $ans=a_i+a_{i-1}+a_{i+1}-a_i=a_{i-1}+a_{i+1}$，再重置，删除：

$$\require{cancel}\cancel{a_{i-2}}~~~~\cancel{a_{i-1}}~~~~a_{i-2}+a_{i+2}-a_{i-1}-a_{i+1}+a_i~~~~\cancel{a_{i+1}}~~~~\cancel{a_{i+2}}$$

  可以发现，这与直接选 $a_{i-2}$ 和 $a_{i+2}$ 是等效的！所以维护一个双向链表，利用堆进行贪心即可。

  复杂度 $\mathcal O(n\log n)$。

$\mathcal{Code}$

#include <queue>
#include <cstdio>

typedef long long LL;
typedef std::pair<LL, int> pli;

const int MAXN = 1e5;
int n, K, pre[MAXN + 5], suf[MAXN + 5];
LL val[MAXN + 5];
bool rmd[MAXN + 5];
std::priority_queue<pli, std::vector<pli>, std::greater<pli> > heap;

inline int rint () {
	int x = 0; char s = getchar ();
	for ( ; s < '0' || '9' < s; s = getchar () );
	for ( ; '0' <= s && s <= '9'; s = getchar () ) x = x * 10 + ( s ^ '0' );
	return x;
}

inline void rmpos ( const int u ) {
	if ( ! u || u == n ) return ;
	rmd[u] = true;
	if ( pre[u] ) suf[pre[u]] = suf[u];
	if ( suf[u] ^ n ) pre[suf[u]] = pre[u];
	pre[u] = suf[u] = 0;
}

int main () {
	n = rint (), K = rint ();
	for ( int i = 0, p, las; i < n; ++ i ) {
		p = rint ();
		if ( i ) {
			heap.push ( { val[i] = p - las, i } );
			pre[i] = i - 1, suf[i] = i + 1;
		}
		las = p;
	}
	LL ans = 0;
	val[0] = val[n] = 1ll << 60;
	while ( K -- ) {
		pli t = heap.top (); heap.pop ();
		if ( rmd[t.second] ) { ++ K; continue; }
		ans += t.first; LL nv = -t.first;
		nv += val[pre[t.second]], rmpos ( pre[t.second] );
		nv += val[suf[t.second]], rmpos ( suf[t.second] );
		heap.push ( { val[t.second] = nv, t.second } );
	}
	printf ( "%lld\n", ans );
	return 0;
}