请教怎么用stata挑comparables？很急！

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

大虾们帮帮忙啊。
有两个spreadsheet, 第一个里面是样本， 第二个里面是comparables.
比如：
sheet 1
姓名 班级 体重 出生年份
小明 一班 100   1990
小红 二班 120   1989
小强 一班  180   1990


sheet 2
姓名 班级 体重 出生年份
小刚 一班 200   1990
小一 一班 190    1990
小二 一班 120   1990
小三 二班  110   1990
小四 一班 110    1990
小五 二班 130   1989
根据sheet 1从sheet 2里面挑样本，挑出同班、同年出生且同重量级（+/-20）的同学，比如输出结果如下：
姓名 班级 体重 出生年份
小明 一班 100   1990
小二 一班 120   1990
小四 一班 110    1990

小红 二班 120   1989
小五 二班 130   1989

小强 一班  180   1990
小刚 一班 200   1990
小一 一班 190    1990

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏3 回帖

关键词：comparables Comparable arable Stata comp 小三 姓名 样本

这里有个问题：

如果sheet1中A体重160，B体重180；而sheet2中C体重170（其他条件相同），那么C与A并还是与B并？

最好把你的两个数据库帖出来，针对数据库设计命令。

数据库太大了，如果是您说的那种情况，C于A和B各并一次

这是一个非常具有普适性的问题，搞公司金融和产业组织的人都会遇到这样的问题，就是配对样本的选取问题。以前我的解决办法是用VBA编个程序，用Excel运行，但显然速度有些慢，期待着哪位牛人出手相助。

数据大，你可以拿出部分数据，

denver 发表于 2009-6-18 09:37
这是一个非常具有普适性的问题，搞公司金融和产业组织的人都会遇到这样的问题，就是配对样本的选取问题。以前我的解决办法是用VBA编个程序，用Excel运行，但显然速度有些慢，期待着哪位牛人出手相助。

这确实是一个非常具有普适性的问题！能否贡献一下你的vba程序和部分数据呢？也让我们学习借鉴。

一个基本满足要求的程序：

// input sheet1 and sheet2
clear
input str4 name str4 class weight year
        小明 一班 100   1990
        小红 二班 120   1989
        小强 一班  180   1990
end
save sheet1, replace

clear
input str4 name str4 class weight year
        小刚 一班 200   1990
        小一 一班 190    1990
        小二 一班 120   1990
        小三 二班  110   1990
        小四 一班 110    1990
        小五 二班 130   1989
end
save sheet2, replace

// create blank comparables.dta
clear
gen str4 name = ""
gen str4 class = ""
gen weight = .
gen year = .
gen str4 nameo = ""
// gen str4 classo = ""
// gen weighto = .
// gen yearo = .
save comparables, replace


// main
use sheet1, clear
local num = _N
preserve
forval i = 1/`num' {
        local name = name[`i']
        local class = class[`i']
        local weight = weight[`i']
        local year = year[`i']
        quietly use if class == "`class'" ///
                & weight <= `weight'+20 & weight >= `weight'-20                ///
                & year == `year' using sheet2, clear
        gen nameo = "`name'"
        // gen classo = "`class'"
        // gen weighto = `weight'
        // gen yearo = `year'
        append using comparables
        quietly save comparables, replace
        restore, preserve
}

use comparables, clear
list

voodoo 乃牛人也，学习了。下周我把我的VBA程序整理下也放上来，供大家批评。
只是在几个gen那不应该有//
另外，有个问题：不知道preserve和restore在这里起什么作用，因为forvalue本身就是一个循环了，因此去掉preserve和restore对于结果应该没有影响。

denver 发表于 2009-6-19 09:30
voodoo 乃牛人也，学习了。下周我把我的VBA程序整理下也放上来，供大家批评。
只是在几个gen那不应该有//
另外，有个问题：不知道preserve和restore在这里起什么作用，因为forvalue本身就是一个循环了，因此去掉preserve和restore对于结果应该没有影响。

denver坛友过奖了，我也是Stata的爱好者和学习者而已。若干程序语句加上//只是认为该语句没太大必要。尽管在循环中，preserve和restore应该是必要的。

若sheet2是个大数据库，8楼的程序可能效率低了点，对main部分改进如下（将sheet2直接调入内存中，所以sheet2也不能太大了；若sheet2大于你Stata数据所能使用的内存，用8楼的程序）——只能算是可能的“改进”，因为没有大数据库可供试验：

// main
use sheet1, clear
local num = _N
// set memory ???.m
use sheet2, clear
preserve
forval i = 1/`num' {
        quietly use in `i' using sheet1, clear
        local name = name[1]               // 因为只有一个obs，甚至可以用local name = name，速度会快一点点，下同
        local class = class[1]
        local weight = weight[1]
        local year = year[1]
        restore, preserve
        quietly keep if class == "`class'"                 ///
                & weight <= `weight'+20 & weight >= `weight'-20                ///
                & year == `year'
        gen nameo = "`name'"
        // gen classo = "`class'"
        // gen weighto = `weight'
        // gen yearo = `year'
        append using comparables
        quietly save comparables, replace
}
use comparables, clear
list