求助：简化代码和编码方式

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

各位老师，请帮忙将以下代码简化一下
replace `stssl'= "α" if `ntssl'==36
replace `stssl'= "β" if `ntssl'==37
replace `stssl'= "γ" if `ntssl'==38
replace `stssl'= "δ" if `ntssl'==39
replace `stssl'= "ε" if `ntssl'==40
replace `stssl'= "ζ" if `ntssl'==41
replace `stssl'= "η" if `ntssl'==42
replace `stssl'= "θ" if `ntssl'==43
replace `stssl'= "λ" if `ntssl'==44
replace `stssl'= "μ" if `ntssl'==45
replace `stssl'= "ξ" if `ntssl'==46
replace `stssl'= "π" if `ntssl'==47
replace `stssl'= "ρ" if `ntssl'==48
replace `stssl'= "φ" if `ntssl'==49
replace `stssl'= "ψ" if `ntssl'==50
replace `stssl'= "ω" if `ntssl'==51

扫码加我 拉你入群

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

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

分享0 收藏1 回帖

关键词：replace place TSS LAC STS replace

先有一个问题：Stata支持希腊字母吗？

sungmoo 发表于 2011-12-22 17:46
先有一个问题：Stata支持希腊字母吗？

stata对希腊字母的支持与对汉字的支持是一样的.
用loca 可能要简化一些:
loca abc "α β γ δ ε ζ η θ ι κ λ μ ν ξ ο π ρ σ τ υ φ χ ψ ω "
token `abc'
forval i=1/24{
replace `stssl'="``i''"  if `ntssl'==`i'+35
}

foreach i in α β γ δ ε ζ η θ ι κ λ μ ν ξ ο π ρ σ τ υ φ χ ψ ω{
loc n=`n'+1
replace `stssl'="`i'"  if `ntssl'==`n'+35
}

简单测试了一下！
set obs 100
gen x=""
foreach i in α β γ δ ε ζ η θ ι κ λ μ ν ξ ο π ρ σ τ υ φ χ ψ ω {
loc n=`n'+1
replace x="`i'"  if _n==`n'+35
}

/*  要处理的问题是这样的：
将一位或两位纯数字（0 1 2 3 ... 10 11 12 ...99）编码方式转化成统一的一位编码，{实际上是为了扩容，将十进制转化为百进制（不完全是，没有凑成100个字母）}
数据中大于50的数字很少，大部分是基于0到9的数字，一部分是10-40的数字，基于此就采用了这种一一对应的编码方式。（60-99的数字没有找到对应编码）
*/

1. clear
   
2. set obs 100
   
3. gen y=_n-1
   
4. gen x=cond(y<=35,cond(y<10,string(y),char(y+55)),"")
   
5. loca a "α β γ δ ε ζ η θ ι κ λ μ ν ξ ο π ρ σ τ υ φ χ ψ ω"
   
6. token `a'
   
7. forv i=1/24{
   
8. replace x="``i''"  if y==`i'+35
   
9. }

复制代码

不知到哪位有更好的编码方式？请不吝赐教！

直接借助char()即可吧？

sungmoo 发表于 2011-12-25 08:08
直接借助char()即可吧？

基本的 ASCII 字符集共有 128 个字符，其中有 96 个可打印字符，包括常用的字母（26个大写和26个小写字母)、数字(10个）、标点符号等，另外还有 32 个控制字符。如果用字母和数字表示，另大写字母和小写字母易混且一个函数就可以转换，因此对于字母只采用大写字母，可用编码只有36个，这样只能表示成36进制，类似于车牌号的表示。后来考虑到希腊字母却在stata中占用两个字母的位数，因此也是不宜采用的。

*试一下
forv i=0/255{
di char(`i')
}

标点符号类为什么不可以作编码呢？