> datos=read.table("nhijos.txt")
> datos
V1
1 4hijos
2 5hijos
3 3hijos
4 4hijos
5 6hijos
6 6hijos
7 5hijos
8 5hijos
9 7hijos
10 3hijos
11 2hijos
12 5hijos
13 5hijos
14 7hijos
15 3hijos
16 6hijos
17 5hijos
18 3hijos
19 4hijos
20 5hijos
21 6hijos
22 2hijos
23 8hijos
24 3hijos
25 5hijos
26 7hijos
27 2hijos
28 2hijos
29 5hijos
30 8hijos
31 5hijos
32 3hijos
33 6hijos
34 5hijos
35 3hijos
36 6hijos
37 5hijos
38 5hijos
39 4hijos
40 5hijos
41 3hijos
42 4hijos
43 4hijos
44 3hijos
45 4hijos
46 2hijos
47 5hijos
48 4hijos
49 4hijos
50 6hijos
51 3hijos
52 3hijos
53 9hijos
54 6hijos
55 4hijos
56 2hijos
57 4hijos
58 6hijos
59 2hijos
60 6hijos
61 5hijos
62 2hijos
63 2hijos
64 3hijos
65 5hijos
66 10hijos
67 3hijos
68 5hijos
69 4hijos
70 5hijos
71 5hijos
72 4hijos
73 2hijos
74 4hijos
75 3hijos
76 4hijos
77 3hijos
78 4hijos
79 4hijos
80 4hijos
81 3hijos
82 4hijos
83 4hijos
84 4hijos
85 1hijos
86 4hijos
87 4hijos
88 5hijos
89 2hijos
90 2hijos
91 4hijos
92 4hijos
93 1hijos
94 4hijos
95 5hijos
96 5hijos
97 7hijos
98 3hijos
99 2hijos
100 4hijos
> f=table(nhijos)
Error in table(nhijos) : object 'nhijos' not found
> f=table(datos)
> f
datos
10hijos 1hijos 2hijos 3hijos 4hijos 5hijos 6hijos 7hijos 8hijos 9hijos
1 2 13 17 27 23 10 4 2 1
> n=sum(f)
> n
[1] 100
> h=(f/n)*100
> h
datos
10hijos 1hijos 2hijos 3hijos 4hijos 5hijos 6hijos 7hijos 8hijos 9hijos
1 2 13 17 27 23 10 4 2 1
> F=cumsum(f)
> F
10hijos 1hijos 2hijos 3hijos 4hijos 5hijos 6hijos 7hijos 8hijos 9hijos
1 3 16 33 60 83 93 97 99 100
> H=cumsum(h)
> H
10hijos 1hijos 2hijos 3hijos 4hijos 5hijos 6hijos 7hijos 8hijos 9hijos
1 3 16 33 60 83 93 97 99 100
> cbind(f,h,F,H)
f h F H
10hijos 1 1 1 1
1hijos 2 2 3 3
2hijos 13 13 16 16
3hijos 17 17 33 33
4hijos 27 27 60 60
5hijos 23 23 83 83
6hijos 10 10 93 93
7hijos 4 4 97 97
8hijos 2 2 99 99
9hijos 1 1 100 100
> mean(datos)
[1] NA
Warning message:
In mean.default(datos) : argument is not numeric or logical: returning NA
> datos
V1
1 4hijos
2 5hijos
3 3hijos
4 4hijos
5 6hijos
6 6hijos
7 5hijos
8 5hijos
9 7hijos
10 3hijos
11 2hijos
12 5hijos
13 5hijos
14 7hijos
15 3hijos
16 6hijos
17 5hijos
18 3hijos
19 4hijos
20 5hijos
21 6hijos
22 2hijos
23 8hijos
24 3hijos
25 5hijos
26 7hijos
27 2hijos
28 2hijos
29 5hijos
30 8hijos
31 5hijos
32 3hijos
33 6hijos
34 5hijos
35 3hijos
36 6hijos
37 5hijos
38 5hijos
39 4hijos
40 5hijos
41 3hijos
42 4hijos
43 4hijos
44 3hijos
45 4hijos
46 2hijos
47 5hijos
48 4hijos
49 4hijos
50 6hijos
51 3hijos
52 3hijos
53 9hijos
54 6hijos
55 4hijos
56 2hijos
57 4hijos
58 6hijos
59 2hijos
60 6hijos
61 5hijos
62 2hijos
63 2hijos
64 3hijos
65 5hijos
66 10hijos
67 3hijos
68 5hijos
69 4hijos
70 5hijos
71 5hijos
72 4hijos
73 2hijos
74 4hijos
75 3hijos
76 4hijos
77 3hijos
78 4hijos
79 4hijos
80 4hijos
81 3hijos
82 4hijos
83 4hijos
84 4hijos
85 1hijos
86 4hijos
87 4hijos
88 5hijos
89 2hijos
90 2hijos
91 4hijos
92 4hijos
93 1hijos
94 4hijos
95 5hijos
96 5hijos
97 7hijos
98 3hijos
99 2hijos
100 4hijos
> datos=read.table("hijos.txt")
> datos
V1
1 4
2 5
3 3
4 4
5 6
6 6
7 5
8 5
9 7
10 3
11 2
12 5
13 5
14 7
15 3
16 6
17 5
18 3
19 4
20 5
21 6
22 2
23 8
24 3
25 5
26 7
27 2
28 2
29 5
30 8
31 5
32 3
33 6
34 5
35 3
36 6
37 5
38 5
39 4
40 5
41 3
42 4
43 4
44 3
45 4
46 2
47 5
48 4
49 4
50 6
51 3
52 3
53 9
54 6
55 4
56 2
57 4
58 6
59 2
60 6
61 5
62 2
63 2
64 3
65 5
66 10
67 3
68 5
69 4
70 5
71 5
72 4
73 2
74 4
75 3
76 4
77 3
78 4
79 4
80 4
81 3
82 4
83 4
84 4
85 1
86 4
87 4
88 5
89 2
90 2
91 4
92 4
93 1
94 4
95 5
96 5
97 7
98 3
99 2
100 4
> f=table(datos)
> f
datos
1 2 3 4 5 6 7 8 9 10
2 13 17 27 23 10 4 2 1 1
> n=sum(f)
> h=(f/n)*100
> F=cumsum(f)
> H=cumsum(h)
> cbind(f,h,F,H)
f h F H
1 2 2 2 2
2 13 13 15 15
3 17 17 32 32
4 27 27 59 59
5 23 23 82 82
6 10 10 92 92
7 4 4 96 96
8 2 2 98 98
9 1 1 99 99
10 1 1 100 100
> boxplot(datos)
> summary(datos)
V1
Min. : 1.00
1st Qu.: 3.00
Median : 4.00
Mean : 4.25
3rd Qu.: 5.00
Max. :10.00
No hay comentarios.:
Publicar un comentario