DATA2002-WEEK6

Permutation test

 lady tea test (Recall fisher test)

truth = c("milk","tea","tea","milk","tea","tea","milk","milk")
permute_gues s= permutations(truth)

B = nrow(permute_guess)
check_correct = vector("numeric", length = B)
for(i in 1:B) {
check_correct[i] = identical(permute_guess[i,], truth)
}
mean(check_correct) # p-value

tt = t.test(weight ~ group, data = dat, var.equal = TRUE) #observed t test
B = 10000 # number of permuted samples we will consider
permuted_dat = dat # make a copy of the data
t_null = vector("numeric", B) # initialise outside loop
for(i in 1:B) {
permuted_dat$group = sample(dat$group)  # this does the permutation
t_null[i] = t.test(weight ~ group, data = permuted_dat)$statistic
}
mean(abs(t_null) >= abs(tt$statistic))

two sided test example, t test can be changed to Wilcoxon rank sum test

Robustly standardised difference in medians

 mad():绝对中位差实际求法是用原数据减去中位数后得到的新数据的绝对值的中位数。但绝对中位差常用来估计标准差,估计标准差=1.4826*绝对中位差。R语言中返回的是估计的标准差。

Paired sample test

We resample the sign.

与t test的t0比,不需要管P-value. 出现t0以及比t0更极端的情况是permutation test 的p-value

忘记了看这个链接,很详细!:Permutation Test: Visual Explanation

Estimation vs hypothesis testing

Estimation

A population parameter is unknown.

Use the sample statistics to generate estimates of the population parameter.

Hypothesis testing

Explicit statement (or hypothesis) regarding the population parameter.

Test statistics are generated which will either support or reject the null hypothesis.

Confidence intervals

We should avoid reporting just a point estimate for a sample, always include a measure of variability \widehat{\Theta} +- critical value * SE(\widehat{\Theta})

 

Bootstrapping

Bootstrapping is a computational process that allows us to as make inferences about the population where no information is available about the population. The classic approach to bootstrapping is to repeatedly resample from the sample (with replacement).

set.seed(123)
B = 10000
result = vector("numeric", length = B)
for(i in 1:B){
newData = sample(speed, replace = TRUE)
result[i] = mean(newData)
}

quantile(result, c(0.025, 0.975)) #95% CI

The bootstrap and the confidence intervals are now very similar.

Trimming the outliers will make the CI of bootstrapping more symmetric.

Summary

 

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
未来社区的建设背景和需求分析指出,随着智能经济、大数据、人工智能、物联网、区块链、云计算等技术的发展,社区服务正朝着数字化、智能化转型。社区服务渠道由分散向统一融合转变,服务内容由通用庞杂向个性化、服务导向转变。未来社区将构建数字化生态,实现数据在线、组织在线、服务在线、产品智能和决策智能,赋能企业创新,同时注重人才培养和科研平台建设。 规划设计方面,未来社区将基于居民需求,打造以服务为中心的社区管理模式。通过统一的服务平台和应用,实现服务内容的整合和优化,提供灵活多样的服务方式,如推送式、订阅式、热点式等。社区将构建数据与应用的良性循环,提高服务效率,同时注重生态优美、绿色低碳、社会和谐,以实现幸福民生和产业发展。 建设运营上,未来社区强调科学规划、以人为本,创新引领、重点突破,统筹推进、整体提升。通过实施院落+社团自治工程,转变政府职能,深化社区自治法制化、信息化,解决社区治理中的重点问题。目标是培养有活力的社会组织,提高社区居民参与度和满意度,实现社区治理服务的制度机制创新。 未来社区的数字化解决方案包括信息发布系统、服务系统和管理系统。信息发布系统涵盖公共服务类和社会化服务类信息,提供政策宣传、家政服务、健康医疗咨询等功能。服务系统功能需求包括办事指南、公共服务、社区工作参与互动等,旨在提高社区服务能力。管理系统功能需求则涉及院落管理、社团管理、社工队伍管理等,以实现社区治理的现代化。 最后,未来社区建设注重整合政府、社会组织、企业等多方资源,以提高社区服务的效率和质量。通过建立社区管理服务综合信息平台,提供社区公共服务、社区社会组织管理服务和社区便民服务,实现管理精简、高效、透明,服务快速、便捷。同时,通过培育和发展社区协会、社团等组织,激发社会化组织活力,为居民提供综合性的咨询和服务,促进社区的和谐发展。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值