С Новым годом! Форум программистов, компьютерный форум, киберфорум
C# .NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.53/15: Рейтинг темы: голосов - 15, средняя оценка - 4.53
15 / 15 / 5
Регистрация: 26.11.2008
Сообщений: 94

Коефициент ранговой кореляции Спирмена (оптимизация програмы)

14.04.2010, 22:05. Показов 2997. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
C#
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
using System;
using System.Collections.Generic;
using System.Text;
using System.IO;
 
namespace Spirmen
{
    class vub
    {
        public double x, y, rx, ry, dr;
    }
    class Sort_Rank
    {
        public void QuickX(int left, int right, ref vub[] a)
        {
            int l, r;
            vub mid = new vub();
            l = left; r = right; mid = a[l];
            do
            {
                while ((a[r].x >= mid.x) & (l < r)) r = r - 1;
                a[l] = a[r]; a[r] = mid;
                while ((a[l].x <= mid.x) & (l < r)) l = l + 1;
                a[r] = a[l]; a[l] = mid;
            } while (l != r); a[l] = mid;
            if (left < l - 1) QuickX(left, l - 1, ref a);
            if (l + 1 < right) QuickX(l + 1, right, ref a);
        }
 
        public void QuickY(int left, int right, ref vub[] a)
        {
            int l, r;
            vub mid = new vub();
            l = left; r = right; mid = a[l];
            do
            {
                while ((a[r].y >= mid.y) & (l < r)) r = r - 1;
                a[l] = a[r]; a[r] = mid;
                while ((a[l].y <= mid.y) & (l < r)) l = l + 1;
                a[r] = a[l]; a[l] = mid;
            } while (l != r); a[l] = mid;
            if (left < l - 1) QuickY(left, l - 1, ref a);
            if (l + 1 < right) QuickY(l + 1, right, ref a);
        }
 
        public void RankX(int n, ref double t_a, ref vub[] a)
        {
            int k, j = -1;
            double s;
            do
            {
                j = j + 1; 
 
                if ((j != n) && (a[j].x == a[j + 1].x))
                {
                    k = j + 1;
                    while ((k <= n) && (a[j].x == a[k].x)) k++;
                    k = k - 1;
                    s = (double)((k * (k + 1) / 2) - ((j - 1) * j / 2)) / (k - j + 1);
                    for (int h = j; h <= k; h++) a[h].rx = s+1;
                    s = k - j + 1;
                    t_a = t_a + s * (s * s - 1) / 12;
                    j = k;
                }
                else
                {
                    a[j].rx = j+1;
                }
            } while (j != n);
        }
 
        public void RankY(int n, ref double t_b, ref vub[] a)
        {
            int k, j = -1;
            double s;
            do
            {
                j = j + 1; 
 
                if ((j != n) && (a[j].y == a[j + 1].y))
                {
                    k = j + 1;
                    while ((k <= n) && (a[j].y == a[k].y)) k++;
                    k = k - 1;
                    s = (double)((k * (k + 1) / 2) - ((j - 1) * j / 2)) / (k - j + 1);
                    for (int h = j; h <= k; h++) a[h].ry = s+1;
                    s = k - j + 1;
                    t_b = t_b + s * (s * s - 1) / 12;
                    j = k;
                }
                else
                {
                    a[j].ry = j+1;
                }
            } while (j != n);
        }
 
    }
 
    class Demonstration
    {
        static void Main(string[] args)
        {
            int n;
            double t_a = 0, t_b = 0, S = 0, Rs = 0;
 
            Console.WriteLine("Enter n");
            n = Int32.Parse(Console.ReadLine());
 
            vub[] a = new vub[n];
 
            for (int i = 0; i < n; i++)
            {
                a[i] = new vub();
            }
 
            Sort_Rank ob = new Sort_Rank();
 
            for (int i = 0; i < n; i++)
            {
                Console.Write("Enter a[" + (i + 1) + "].x = ");
                a[i].x = Double.Parse(Console.ReadLine());
                Console.Write("Enter a[" + (i + 1) + "].y = ");
                a[i].y = Double.Parse(Console.ReadLine());
            }
            ob.QuickX(0, n - 1, ref a);
            ob.RankX(n - 1, ref t_a, ref a);
            ob.QuickY(0, n - 1, ref a);
            ob.RankY(n - 1, ref t_b, ref a);
 
            for (int i = 0; i < n; i++)
            {
                Console.WriteLine(a[i].rx + "   " + a[i].ry);
            }
 
            for (int i = 0; i < n; i++)
            {
                a[i].dr = Math.Pow(a[i].rx - a[i].ry, 2); Console.WriteLine("{0:f4}", a[i].dr);
                S = S + a[i].dr;
            }
            Console.WriteLine("S=" + S);
 
            Rs = 1 - 6 * (S + t_a + t_b) / (n * (n * n - 1));
            Console.WriteLine("Rs = {0:f10}", Rs);
        }
    }
}
Я могу указать в параметре метода по какой переменной сортируеться массив обьектов? Чтобы был один метод для сортировка и присвоение рангов, а не повторялись?
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
14.04.2010, 22:05
Ответы с готовыми решениями:

Подсчет коэффициента ранговой корреляции Спирмена
нужна программа для подсчета Коефициента ранговой кореляции Спирмена на C#

коэффициент ранговой корреляции Спирмена
См. пост №3.

Выборочный коэффициент ранговой корреляции Спирмена и Кендалла
Подскажите, пожалуйста, основные формулы выборочного коэффициента ранговой корреляции Спирмена и Кендалла и если возможно с примерами, чтоб...

2
 Аватар для kuroiryuu
328 / 312 / 68
Регистрация: 05.11.2009
Сообщений: 712
15.04.2010, 12:06
для быстрой сортировки можно сделать такое:
C#
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
    class vub
    {
        public enum field { x, y };
        public double x, y, rx, ry, dr;
    }
    class Sort_Rank
    {
        public void Quick(int left, int right, ref vub[] a, vub.field field)
        {
            int l, r;
            vub mid = new vub();
            l = left; r = right; mid = a[l];
            bool flag = false, flag2 = false;
 
            switch (field)
            {
                case vub.field.x:
                    flag = a[r].x >= mid.x;
                    flag2 = a[l].x <= mid.x;
                    break;
                case vub.field.y:
                    flag = a[r].y >= mid.y;
                    flag2 = a[l].y <= mid.y;
                    break;
            }
 
            do
            {
                while ((flag) & (l < r)) r = r - 1;
                a[l] = a[r]; a[r] = mid;
                while ((flag2) & (l < r)) l = l + 1;
                a[r] = a[l]; a[l] = mid;
            } while (l != r); a[l] = mid;
            if (left < l - 1) Quick(left, l - 1, ref a, field);
            if (l + 1 < right) Quick(l + 1, right, ref a, field);
        }
    }
1
1152 / 860 / 263
Регистрация: 30.04.2009
Сообщений: 3,603
16.04.2010, 12:14
C#
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
void Sorting()
{
      S[] arr = new S[5];
      Array.Sort(arr,S.Sort_By_X);
       Array.Sort(arr,S.Sort_By_Y);
}
 
struct S
        {
            public int x;
            public int y;
 
            public static int Sort_By_X(S s1,S s2)
            {
                return s1.x.CompareTo(s2.x);
            }
 
            public static int Sort_By_Y(S s1, S s2)
            {
                return s1.y.CompareTo(s2.y);
            }
        }
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
16.04.2010, 12:14
Помогаю со студенческими работами здесь

Выборочные коэффициент ранговой корреляции методом Спирмена и Кендала
Тема: Выборочные коэффициент ранговой корреляции методом Спирмена и Кендала. Необходимо написать программу на С# или на С++. Очень надо,...

Оптимизация интерфейса програмы
Народ, столкнулся с такой проблемой, что на другом компьютере моя программа выглядит не так( Скажите, это можно как то решить? Я...

Как определить Запаздывание вместо кореляции
Непосредственно исходник, необходимо определить запаздывание вместо кореляции. Помогите, всю голову сломал. unit Unit1; ...

Коефициент уверености. Малая экспертная система 2.0
Привет. Перерыл все просторы интернета, ответа не нашел, возможно потому-что не силен в вероятностях и т. д. Прошу пояснить следуещее: У...

Чему равен коефициент трения колёс автомобиля о дорогу?
Чему равен коефициент трения колёс автомобиля о дорогу,если при скорости автомобиля v=10 м/с тормозной путь равен s=8 м?


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
сукцессия микоризы: основная теория в виде двух уравнений.
anaschu 11.01.2026
https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/
WordPad для Windows 11
Jel 10.01.2026
WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .
Classic Notepad for Windows 11
Jel 10.01.2026
Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .
Почему дизайн решает?
Neotwalker 09.01.2026
В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .
Модель микоризы: классовый агентный подход 3
anaschu 06.01.2026
aa0a7f55b50dd51c5ec569d2d10c54f6/ O1rJuneU_ls https:/ / vkvideo. ru/ video-115721503_456239114
Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR
ФедосеевПавел 06.01.2026
Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ВВЕДЕНИЕ Введу сокращения: аналоговый ПИД — ПИД регулятор с управляющим выходом в виде числа в диапазоне от 0% до. . .
Модель микоризы: классовый агентный подход 2
anaschu 06.01.2026
репозиторий https:/ / github. com/ shumilovas/ fungi ветка по-частям. коммит Create переделка под биомассу. txt вход sc, но sm считается внутри мицелия. кстати, обьем тоже должен там считаться. . . .
Расчёт токов в цепи постоянного тока
igorrr37 05.01.2026
/ * Дана цепь постоянного тока с сопротивлениями и источниками (напряжения, ЭДС и тока). Найти токи и напряжения во всех элементах. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа и. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru