BZOJ.2428.[HAOI2006]均分数据(随机化贪心/模拟退火)
模拟退火:
模拟退火!每次随机一个位置加给sum[]最小的组。
参数真特么玄学啊。。气的不想调了(其实就是想刷刷最优解)
如果用DP去算好像更准。。
//832kb 428ms
#include <cmath>
#include <cstdio>
#include <cctype>
#include <cstring>
#include <assert.h>
#include <algorithm>
#define gc() getchar()
#define D (0.997)//big enough!
#define eps (1e-3)
#define Rand(x) (rand()%x+1)
const int N=22;
int n,K,A[N],sum[7],bel[N];
double Ans=1e14,Aver,Tmp;
inline int read()
{
int now=0;register char c=gc();
for(;!isdigit(c);c=gc());
for(;isdigit(c);now=now*10+c-'0',c=gc());
return now;
}
inline double Squ(double x){
return x*x;
}
inline void Move(int fr,int to,int tar){
sum[fr]-=A[tar], sum[bel[tar]=to]+=A[tar];
}
//inline void Update(double &x){
// x=0.0; for(int i=1; i<=K; ++i) x+=Squ(sum[i]);
//}
void SA()
{
memset(sum,0,sizeof sum);
for(int i=1; i<=n; ++i) sum[bel[i]=Rand(K)]+=A[i];
double ans=0,nxt;
for(int i=1; i<=K; ++i) ans+=Squ(sum[i]);
Ans=std::min(Ans,ans+Tmp);
for(double T=1e7/*big enough*/; T>eps; T*=D)//Times:6898
{
int tar=Rand(n), fr=bel[tar], to=std::min_element(sum+1,sum+1+K)-sum;
if(fr==to) continue;
nxt=ans-Squ(sum[fr])-Squ(sum[to]);
Move(fr,to,tar);
nxt+=Squ(sum[fr])+Squ(sum[to]);
if(nxt<ans || (exp((ans-nxt)/T)*RAND_MAX>rand())) ans=nxt;//!
else Move(to,fr,tar);
Ans=std::min(Ans,ans+Tmp);//这个放里头!
}
}
int main()
{
n=read(),K=read();
int sum=0;
for(int i=1; i<=n; ++i) sum+=(A[i]=read());
Aver=1.0*sum/K, Tmp=K*Aver*Aver-2.0*sum*Aver;
// std::random_shuffle(A+1,A+1+n);//这东西。。有时好有时坏
for(int i=1; i<=30; ++i) SA();
printf("%.2lf",sqrt(Ans/(double)K));
return 0;
}
简单好写(错误率高)的裸随机化贪心:
使每组(sum_i-Average)尽量平均(也就是使Σ(sum_i^2)最小)。数据范围这么小,而且只保留两位。。
不连续分组很难办,但是random_shuffle()一下连续分组很多次就可以达到伪不连续分组的效果了。。
具体,我们可以随便分啊按照某种策略来分,比如依次分给当前sum最小的组。
被随机数种子一直卡一个点是怎样的体验。。我特么不设了。
//832kb 2448ms
#include <cmath>
#include <cstdio>
#include <cctype>
#include <cstring>
#include <algorithm>
#define gc() getchar()
const int N=21;
int n,K,A[N],sum[7];
double Ans=1e15,Aver,Tmp;
inline int read()
{
int now=0;register char c=gc();
for(;!isdigit(c);c=gc());
for(;isdigit(c);now=now*10+c-'0',c=gc());
return now;
}
void Work()
{
std::random_shuffle(A+1,A+1+n);
memset(sum,0,sizeof sum);
for(int i=1; i<=n; ++i)
sum[std::min_element(sum+1,sum+1+K)-sum]+=A[i];
double res=0;
for(int i=1; i<=K; ++i) res+=1.0*sum[i]*sum[i];//Aver可以提出来。。
Ans=std::min(Ans,res+Tmp);
}
int main()
{
n=read(),K=read();
int sum=0;
for(int i=1; i<=n; ++i) sum+=(A[i]=read());
Aver=1.0*sum/K, Tmp=K*Aver*Aver-2.0*sum*Aver;
for(int i=1; i<=300000; ++i) Work();
printf("%.2lf",sqrt(Ans/(double)K));
return 0;
}
BZOJ.2428.[HAOI2006]均分数据(随机化贪心/模拟退火)的更多相关文章
- bzoj 2428: [HAOI2006]均分数据 随机化
2428: [HAOI2006]均分数据 Time Limit: 20 Sec Memory Limit: 256 MB 题目连接 http://www.lydsy.com/JudgeOnline/ ...
- 洛谷 P2503 [HAOI2006]均分数据 随机化贪心
洛谷P2503 [HAOI2006]均分数据(随机化贪心) 现在来看这个题就是水题,但模拟赛时想了1个小时贪心,推了一堆结论,最后发现贪心做 不了, 又想了半个小时dp 发现dp好像也做不了,在随机化 ...
- bzoj 2428: [HAOI2006]均分数据 && bzoj 3680 : 吊打XXX 模拟退火
每次把元素随便扔随机一个初始解,退火时每次随机拿一个元素扔到随机一个集合里,当温度高时因为状态不稳定扔到那个元素和最小的里边. 如果新解优,更新ans. 把原式拆一下,就可以用int存了. bzoj ...
- bzoj 2428: [HAOI2006]均分数据
#include<cstdio> #include<iostream> #include<cstdlib> #include<ctime> #inclu ...
- 2428: [HAOI2006]均分数据
模拟退火.一种十分玄学的随机算法,网上可以查到比较详细的资料. 先随机地把数分成m组,每次随机地选择一个数,一开始直接选最小的一组,后来就随机一组,把这个数换到该组看看答案能不能变小,如果变小则换,如 ...
- bzoj2428: [HAOI2006]均分数据
模拟退火.挺好理解的.然后res打成了ans一直WA一直WA...!!!一定要注意嗷嗷嗷一定要注意嗷嗷嗷一定要注意嗷嗷嗷. 然后我就一直卡一直卡...发现最少1800次的时候就可以出解了.然后我就去调 ...
- bzoj2428 [HAOI2006]均分数据 模拟退火
[HAOI2006]均分数据 Time Limit: 5 Sec Memory Limit: 128 MBSubmit: 3434 Solved: 1091[Submit][Status][Dis ...
- P2503 [HAOI2006]均分数据
P2503 [HAOI2006]均分数据 模拟退火+dp (不得不说,我今天欧气爆棚) 随机出1个数列,然后跑一遍dp统计 #include<iostream> #include<c ...
- BZOJ 2428 JZYZOJ1533 : [HAOI2006]均分数据 模拟退火 随机化
http://www.lydsy.com/JudgeOnline/problem.php?id=2428 http://172.20.6.3/Problem_Show.asp?id=1533 http ...
随机推荐
- VS2010 项目属性的默认包含路径设置方法
VS2010 项目属性的默认包含路径设置方法 分类: c++小技巧2014-01-10 10:16 1358人阅读 评论(0) 收藏 举报 c++ 有两种方法可以设置vs2010的默认包含路径 方法一 ...
- Strusts2笔记4--类型转换器
类型转换器: Struts2默认情况下可以将表单中输入的文本数据转换为相应的基本数据类型.这个功能的实现,主要是由于Struts2内置了类型转换器.这些转换器在struts-default.xml中可 ...
- perl6 Net::HTTP 发送任意 url 请求例子
只做个笔记, 用 HTTP::UserAgent 的话, url 中有特殊点的符号会请求不了, 用 Net::HTTP 能很好的发送请求. use Net::HTTP::GET; my $url = ...
- Vue 进阶教程之:详解 v-model
分享 Vue 官网教程上关于 v-model 的讲解不是十分的详细,写这篇文章的目的就是详细的剖析一下, 并介绍 Vue 2.2 v-model改进的地方,然后穿插的再说点 Vue 的小知识. 在 V ...
- Ubuntu下apache2启动、停止、重启、配置
Linux系统为Ubuntu 一.Start Apache 2 Server /启动apache服务# /etc/init.d/apache2 startor$ sudo /etc/init.d/ap ...
- Zabbix的通知功能以及自定义脚本告警
本节内容: Zabbix的通知功能 定义接收告警的用户 定义Action Zabbix自定义脚本发送报警邮件 一.Zabbix的通知功能 在配置好监控项和触发器之后,一旦正常工作中的某触发器状态发生改 ...
- #CSS 文本溢出部分显示省略号
单行结尾溢出: 用text-overflow:ellipsis属性实现,当然还需要加宽度width属来兼容部分浏览. width:300px;overflow: hidden; text-overfl ...
- nginx学习 一.window下安装
1. nginx下载路径 http://nginx.org/en/download.html 2.下载后解压到一个没有中文名的文件夹中 3.修改server下location的root为具体的路径,修 ...
- Web前端开发最佳实践系列文章汇总
Web前端开发最佳实践(1):前端开发概述 Web前端开发最佳实践(2):前端代码重构 Web前端开发最佳实践(3):前端代码和资源的压缩与合并 Web前端开发最佳实践(4):在页面中添加必要的met ...
- shell实现增加删除Linux系统用户脚本(密码为随机)
README shell环境下运行脚本,根据需求选择相应的功能. List \t\t create the userlist 这一步是必须执行的,脚本会识别本地当前目录下的文件 Useradd \t\ ...