{"id":16475354,"url":"https://github.com/avinal/rstats-test","last_synced_at":"2025-02-28T09:35:51.198Z","repository":{"id":115432715,"uuid":"324530647","full_name":"avinal/rstats-test","owner":"avinal","description":"Binary Segmentation Project tests","archived":false,"fork":false,"pushed_at":"2020-12-26T14:05:23.000Z","size":212,"stargazers_count":0,"open_issues_count":0,"forks_count":0,"subscribers_count":2,"default_branch":"main","last_synced_at":"2025-02-22T01:32:06.705Z","etag":null,"topics":[],"latest_commit_sha":null,"homepage":null,"language":"R","has_issues":true,"has_wiki":null,"has_pages":null,"mirror_url":null,"source_name":null,"license":"mit","status":null,"scm":"git","pull_requests_enabled":true,"icon_url":"https://github.com/avinal.png","metadata":{"files":{"readme":"README.md","changelog":null,"contributing":null,"funding":null,"license":"LICENSE","code_of_conduct":null,"threat_model":null,"audit":null,"citation":null,"codeowners":null,"security":null,"support":null,"governance":null,"roadmap":null,"authors":null,"dei":null,"publiccode":null,"codemeta":null}},"created_at":"2020-12-26T10:24:49.000Z","updated_at":"2020-12-26T16:36:36.000Z","dependencies_parsed_at":null,"dependency_job_id":"916c946e-1de0-4403-9a1b-01e3cd9533b3","html_url":"https://github.com/avinal/rstats-test","commit_stats":null,"previous_names":[],"tags_count":0,"template":false,"template_full_name":null,"repository_url":"https://repos.ecosyste.ms/api/v1/hosts/GitHub/repositories/avinal%2Frstats-test","tags_url":"https://repos.ecosyste.ms/api/v1/hosts/GitHub/repositories/avinal%2Frstats-test/tags","releases_url":"https://repos.ecosyste.ms/api/v1/hosts/GitHub/repositories/avinal%2Frstats-test/releases","manifests_url":"https://repos.ecosyste.ms/api/v1/hosts/GitHub/repositories/avinal%2Frstats-test/manifests","owner_url":"https://repos.ecosyste.ms/api/v1/hosts/GitHub/owners/avinal","download_url":"https://codeload.github.com/avinal/rstats-test/tar.gz/refs/heads/main","host":{"name":"GitHub","url":"https://github.com","kind":"github","repositories_count":241131779,"owners_count":19915013,"icon_url":"https://github.com/github.png","version":null,"created_at":"2022-05-30T11:31:42.601Z","updated_at":"2022-07-04T15:15:14.044Z","host_url":"https://repos.ecosyste.ms/api/v1/hosts/GitHub","repositories_url":"https://repos.ecosyste.ms/api/v1/hosts/GitHub/repositories","repository_names_url":"https://repos.ecosyste.ms/api/v1/hosts/GitHub/repository_names","owners_url":"https://repos.ecosyste.ms/api/v1/hosts/GitHub/owners"}},"keywords":[],"created_at":"2024-10-11T12:37:47.503Z","updated_at":"2025-02-28T09:35:51.181Z","avatar_url":"https://github.com/avinal.png","language":"R","funding_links":[],"categories":[],"sub_categories":[],"readme":"# rstats-test \nBinary Segmentation Project tests\n\n## Easy\n- Download data(*neuroblastoma*, package=”neuroblastoma”) and **plot profile.id=4**, **chromosome=2**, (**y=logratio**, ***x=position***).\n    ```txt\n    total data points = 234\n    ```\n    \u003cimg src=\"Easy/task1a.svg\" align=center\u003e\n\n- Use *binsegRcpp* to compute binary segmentation models up to 5 segments (change in mean, normal distribution), then plot those segment means and changepoints on top of the data.\n\n    | S No. | 1 | 2 | 3 | 4 | 5 | 6 |\n    | --- | --- | --- | --- | --- | --- | --- |\n    | Segment | 1-41 | 42-113 | 114-146 | 147-152 | 153-157 | 158-234 |\n    | Mean | 0.351231083 | 0.005885206 | -0.447813047 | -0.307411681 | -0.666259257 | 0.003035709 |\n    | Changepoint | 41 | 113 | 146 | 152 | 157 | - |\n    \n    \u003cimg src=\"Easy/task1b.svg\" align=center\u003e\n\n    \n## Medium\n- Use the *changepoint* package to compute models up to 5 segments for the same data set. \n\n    | S No. | 1 | 2 | 3 | 4 | 5 | 6 |\n    | --- | --- | --- | --- | --- | --- | --- |\n    | Segment | 1-41 | 42-113 | 114-152 | 153-157 | 158-220 | 220-234 |\n    | Mean | 0.351231083 | 0.005885206 | -0.426212837 | -0.666259257 | 0.016075375 | -0.055642790 \n    | Changepoint | 41 | 113 | 152 | 157 | 220 | - |\n\n- Are the changepoints the same? \n\n    While most of the changepoints are same there are few variation, shown in table and in figure as \u003ci style=\"color:skyblue\"\u003eblue box\u003c/i\u003e. \n    \u003ctable align=center\u003e\n        \u003ctr\u003e\n            \u003ctd\u003ePackage\u003c/td\u003e\n            \u003ctd colspan=\"5\"\u003eChangepoints\u003c/td\u003e\n        \u003c/tr\u003e\n        \u003ctr\u003e\n            \u003ctd\u003ebinsegRcpp\u003c/td\u003e\n            \u003ctd\u003e 41 \u003c/td\u003e\n            \u003ctd\u003e 113 \u003c/td\u003e\n            \u003ctd\u003e \u003ci style=\"color:red\"\u003e146\u003c/i\u003e \u003c/td\u003e\n            \u003ctd\u003e 152 \u003c/td\u003e\n            \u003ctd\u003e 157 \u003c/td\u003e\n        \u003c/tr\u003e\n        \u003ctr\u003e\n            \u003ctd\u003echangepoint\u003c/td\u003e\n            \u003ctd\u003e 41 \u003c/td\u003e\n            \u003ctd\u003e 113 \u003c/td\u003e\n            \u003ctd\u003e 152 \u003c/td\u003e\n            \u003ctd\u003e 157 \u003c/td\u003e\n            \u003ctd\u003e \u003ci style=\"color:red\"\u003e220\u003c/i\u003e \u003c/td\u003e\n        \u003c/tr\u003e\n    \u003c/table\u003e\n\n    \u003cimg src=\"Medium/compare.png\" align=center\u003e\n\n\n## Hard 1\n- Implement Negative Binomial loss function in C code using the same arguments as in [changepoint/src/cost_general_functions.c](\"https://github.com/rkillick/changepoint/blob/master/src/cost_general_functions.c\").\n\n\n## Hard 2\n- Fork binsegRcpp and modify [src/binseg_normal.cpp](\"https://github.com/tdhock/binsegRcpp/blob/master/src/binseg_normal.cpp\") so that it computes change in mean and variance (instead of change of mean with constant variance).\n- Use it to compute changepoints for the same neuroblastoma data set, and verify that the result is the same as the result of `changepoint::cpt.meanvar`.","project_url":"https://awesome.ecosyste.ms/api/v1/projects/github.com%2Favinal%2Frstats-test","html_url":"https://awesome.ecosyste.ms/projects/github.com%2Favinal%2Frstats-test","lists_url":"https://awesome.ecosyste.ms/api/v1/projects/github.com%2Favinal%2Frstats-test/lists"}