Difference between revisions of "Evolutionary origin of human traits"

From Testiwiki
Jump to: navigation, search
(See also: links added)
(Rationale: first code works)
Line 14: Line 14:
  
 
There are conflicting hypotheses to explain why the traits that so clearly distinguish humans from other primates originally evolved. One idea is that the ancestors of humans came to live in a different kind of environment than the ancestors of chimpanzees and gorillas, and hence experienced different selection pressures and obtained a suite of unique traits as adaptations to the new environment. What that new environment was and which selection pressures were most important has been debated, however, and a number of hypotheses based on ideas other than environmental adaptation have also been proposed. To date, general discussion on the topic seems mostly to have focused on finding merit or flaws in one hypothesis at a time. The purpose of this page is to provide a structured forum for the general evaluation and comparison of the different hypotheses on human origins.
 
There are conflicting hypotheses to explain why the traits that so clearly distinguish humans from other primates originally evolved. One idea is that the ancestors of humans came to live in a different kind of environment than the ancestors of chimpanzees and gorillas, and hence experienced different selection pressures and obtained a suite of unique traits as adaptations to the new environment. What that new environment was and which selection pressures were most important has been debated, however, and a number of hypotheses based on ideas other than environmental adaptation have also been proposed. To date, general discussion on the topic seems mostly to have focused on finding merit or flaws in one hypothesis at a time. The purpose of this page is to provide a structured forum for the general evaluation and comparison of the different hypotheses on human origins.
 +
 +
===Calculations===
 +
 +
<rcode graphics="1" variables="
 +
name:X|description:number of X column|
 +
name:Y|description:number of Y column|
 +
name:fill|description:number of fill column|
 +
name:key|type:password|description:Encryption key">
 +
 +
library(OpasnetUtils)
 +
library(ggplot2)
 +
 +
objects.get("mg2Gf5eoR5FVZ8xw")
 +
 +
data <- objects.decode(etable, key)
 +
 +
titles <- c(
 +
"Gender",
 +
"Age",
 +
"Country",
 +
"Education",
 +
"Expertise.1",
 +
"Expertise.2",
 +
"Expertise.3",
 +
"Expertise.4",
 +
"Expertise.5",
 +
"Expertise.6",
 +
"Expertise.7",
 +
"Expertise.8",
 +
"Expertise.9",
 +
"Expertise.10",
 +
"Expertise.11",
 +
"Expertise.12",
 +
"Expertise.13",
 +
"Expertise.14",
 +
"Expertise.15",
 +
"Publications.scientific",
 +
"Publications.general",
 +
"EvolutionPublications.scientific",
 +
"EvolutionPublications.general",
 +
"Courses",
 +
"Familiarity",
 +
"Bipedalism.1",
 +
"Bipedalism.2",
 +
"Bipedalism.3",
 +
"Bipedalism.4",
 +
"Bipedalism.5",
 +
"Bipedalism.6",
 +
"Bipedalism.7",
 +
"Bipedalism.8",
 +
"Bipedalism.9",
 +
"Bipedalism.10",
 +
"Encephalization.1",
 +
"Encephalization.2",
 +
"Encephalization.3",
 +
"Encephalization.4",
 +
"Encephalization.5",
 +
"Encephalization.6",
 +
"Encephalization.7",
 +
"Encephalization.8",
 +
"Encephalization.9",
 +
"Encephalization.10",
 +
"Naked.1",
 +
"Naked.2",
 +
"Naked.3",
 +
"Naked.4",
 +
"Naked.5",
 +
"Naked.6",
 +
"Naked.7",
 +
"Naked.8",
 +
"SubcutaneousFat.1",
 +
"SubcutaneousFat.2",
 +
"SubcutaneousFat.3",
 +
"SubcutaneousFat.4",
 +
"Larynx.1",
 +
"Larynx.2",
 +
"Larynx.3",
 +
"Speech.1",
 +
"Speech.2",
 +
"Speech.3",
 +
"Speech.4",
 +
"Speech.5",
 +
"Speech.6",
 +
"Speech.7",
 +
"BabySwim",
 +
"Nose",
 +
"Smell",
 +
"Fingerweb",
 +
"EccrineGlands",
 +
"Sweating",
 +
"Swimming",
 +
"DivingReflex",
 +
"Bathing",
 +
"AAH.1",
 +
"AAH.2",
 +
"AAH.3",
 +
"AAH.4",
 +
"AAH.5",
 +
"AAH.6",
 +
"AAH.7",
 +
"AAH.8",
 +
"AAH.9",
 +
"AAH.10",
 +
"AAH.11",
 +
"AAH.12",
 +
"AAH.13",
 +
"AAH.14",
 +
"AAH.15",
 +
"AAH.16",
 +
"AAH.17",
 +
"AAH.18",
 +
"AAH.19",
 +
"AAH.20",
 +
"AAHFamiliarity",
 +
"AAHSource.1",
 +
"AAHSource.2",
 +
"AAHSource.3",
 +
"AAHSource.4",
 +
"AAHSource.5",
 +
"AAHSource.6",
 +
"AAHSource.7",
 +
"AAHSource.8",
 +
"AAHAttitude.1",
 +
"AAHAttitude.2",
 +
"AAHAttitude.3"
 +
)
 +
 +
colnames(data) <- titles
 +
 +
data <- data[-(1:2) , ]
 +
#oprint(head(data))
 +
data <- dropall(data)
 +
 +
#for(i in 1:ncol(data)) {
 +
# print(levels(data[[i]]))
 +
#}
 +
 +
X <- colnames(data)[X]
 +
Y <- colnames(data)[Y]
 +
fill <- colnames(data)[fill]
 +
 +
ggplot(data, aes_string(x = X, weight = 1, fill = fill)) +
 +
geom_bar(position = "dodge") +
 +
theme_grey(base_size = 24)
 +
</rcode>
  
 
==See also==
 
==See also==

Revision as of 05:52, 10 March 2013



Question

Why and how did humans become so different from other apes?

Answer

Rationale

There are conflicting hypotheses to explain why the traits that so clearly distinguish humans from other primates originally evolved. One idea is that the ancestors of humans came to live in a different kind of environment than the ancestors of chimpanzees and gorillas, and hence experienced different selection pressures and obtained a suite of unique traits as adaptations to the new environment. What that new environment was and which selection pressures were most important has been debated, however, and a number of hypotheses based on ideas other than environmental adaptation have also been proposed. To date, general discussion on the topic seems mostly to have focused on finding merit or flaws in one hypothesis at a time. The purpose of this page is to provide a structured forum for the general evaluation and comparison of the different hypotheses on human origins.

Calculations

number of X column:

number of Y column:

number of fill column:

Encryption key:

+ Show code

See also

Human evolution hypotheses described in Wikipedia:

Keywords

References


Related files

<mfanonymousfilelist></mfanonymousfilelist>