desktable

  •  
  • 2009年8月20日
  • 注册于 2009年4月24日
  • 可以用

    draw.arc (in plotrix)

    这个是根据圆心、半径和角度来画圆弧。



    我自己写了一个画圆弧函数,

    输入是两个端点,半径,自动计算出圆心,

    还可以指定顺时针、逆时针,大弧还是小弧 -



    my.angle <- function(x, y) {

        if (y >= 0)

            angle = acos(x)

        else

            angle = 2*pi - acos(x)

        angle

    }

    my.arc <- function(p0, p1, radius,

            small.arc = TRUE, clock.wise = FALSE, n = 35) {

        x0 = p0[1]

        x1 = p1[1]

        y0 = p0[2]

        y1 = p1[2]

        dx = x1 - x0

        dy = y1 - y0

        t = sqrt((radius^2 - (dx^2/4 + dy^2/4)) / (dx^2 + dy^2))

        if (xor(small.arc, clock.wise)) t = -t

        dcx = dx/2 + dy*t

        dcy = dy/2 - dx*t

        angle0 = my.angle(-dcx / radius, -dcy / radius)

        angle1 = my.angle((dx - dcx) / radius, (dy - dcy) / radius)

        if (!clock.wise) {

            if (angle1 < angle0) angle1 = angle1 + 2*pi

            angle = seq(angle0, angle1, length.out = n)

        }

        else {

            if (angle0 < angle1) angle0 = angle0 + 2*pi

            angle = seq(angle0, angle1, length.out = n)

        }

        cbind(x0 + dcx + radius * cos(angle), y0 + dcy + radius * sin(angle))

    }



    plot(my.arc(0, 1, 1, 0, small.arc = TRUE, clock.wise = TRUE)
  • 如果替人写大作业发现了是要开除的吧。至少北大是这样规定的。
  • 公司的确很想做好这个研究。不知道有没有可能和cos.name合作…



    补加:如果有哪位cos.name的站长版主看见本帖,请与我联系可以商讨各种合作可能。
  • 这个工作我觉得机会还是很好的。大家不妨考虑一下。



    首先是工资不低,对于兼职工作来说已经不错了,而且有再升高的余地。保证质量的前提下,工作时间也能再协商。



    其次,透露一点,将要做的项目是关于对冲基金管理的,本身比较有意思。这个问题不管是在学术界,还是商业界,都是一个少人研究,而且很有用的课题。



    最后,公司的老板人很好,而且人脉甚广,大家想工作想实习,想出国读书,都有推荐的机会。对想在金融界发展的同学,这是个难得的机会了。



    以上的申请条件是公司制定的,但尺度并不绝对严格。对于真正在统计方面有见解、有能力的人才,不论学历、背景,我们都是欢迎的。
  • Statistics PhD Wanted - Project-based Recruitment



    Requirements:

    1.    Academically capable PhD majored in statistics or related areas. Strength in econometrics, applied time series analysis, multivariable linear regression.

    2.    Good model building capability. Proficiency in at least one of the following software – R, Matlab, SPSS, SAS.

    3.    Good academic writing capability. PUBLICATION is a MUST.

    4.    Ranked top 10 or top 20% in the department.

    5.    Capable of working for at least 3 days a week in May (weekends included).

    6.    Transcripts and academic writing samples will be required for the interview.



    Job Description:

    Work in a research team focused on a specific topic in the finance area assigned by a world famous company based in UK. Design and implement the models and interpret the results.



    The research assignment will conclude before Jun 1st.



    Job Compensation:

    1.    Compensation is project-based, CNY 5,000 upon the accomplishment of research assignments.

    2.    Bonus of CNY 1,000 and further more is available depending on the performance.

    3.    Long-term part-time or full-time job opportunities are open to the best performing candidates.



    If you are qualified and interested in the job, please send your resume and academic writing samples (preferred) to –



    hr@empiricus.com.cn



    Please name you email in the following format –

    Stats-YOUR NAME-YOUR SCHOOL-YOUR MAJOR-YOUR RANK-Beijing

    * We only accept applications from Beijing



    Up to 5 vacancies are currently available.



    Application Deadline – May 3







    这个工作我觉得机会还是很好的。大家不妨考虑一下。



    首先是工资不低,对于兼职工作来说已经不错了,而且有再升高的余地。保证质量的前提下,工作时间也能再协商。



    其次,透露一点,将要做的项目是关于对冲基金管理的,本身比较有意思。这个问题不管是在学术界,还是商业界,都是一个少人研究,而且很有用的课题。



    最后,公司的老板人很好,而且人脉甚广,大家想工作想实习,想出国读书,都有推荐的机会。对想在金融界发展的同学,这是个难得的机会了。



    以上的申请条件是公司制定的,但尺度并不绝对严格。对于真正在统计方面有见解、有能力的人才,不论学历、背景,我们都是欢迎的。