函数代码怎么写

1. excel统计的批注数据(内容)的函数代码怎么写 统计有多少个单元格吗?比如统计批注中包含“中国”的单元格个数 。用自定义函数 。
第一:ALT+F11 , 插入-模块
第二:复制下面的代码
Public Function fx(ByVal a1 As Range)
Sum = 0
For Each x In a1
If InStr(x.Comment.Text ,  "中国") > 0 Then Sum = Sum + 1
Next
fx = Sum
End Function
第三:在结果单元格里输入:比如 , =fx(a1:a7)
如果要显示出哪些单元格都有哪些批注包含了XX字 。这个用函数做不到估计 , 要用程序 , 原理相同 , 请自行研究 。
===================
如果你的区域包含有没有批注的单元格 , 代码要改一下
Public Function fx(ByVal a1 As Range)
Sum = 0
For Each x In a1
If x.Comment Is Nothing Then
Sum = Sum + 0
Else
If InStr(x.Comment.Text ,  "中国") > 0 Then Sum = Sum + 1
End If
Next
fx = Sum
End Function
2. 函数怎么写 R语言实际上是函数的集合 , 用户可以使用base,stats等包中的基本函数 , 也可以自己编写函数完成一定的功能 。
但是初学者往往认为编写R函数十分困难 , 或者难以理解 。这里对如何编写R函数进行简要的介绍 。
函数是对一些程序语句的封装 。换句话说 , 编写函数 , 可以减少人们对重复代码书写 , 从而让R脚本程序更为简洁 , 高效 。
同时也增加了可读性 。一个函数往往完成一项特定的功能 。
例如 , 求标准差sd , 求平均值 , 求生物多样性指数等 。R数据分析 , 就是依靠调用各种函数来完成的 。
【函数代码怎么写】但是编写函数也不是轻而易举就能完成的 , 需要首先经过大量的编程训练 。特别是对R中数据的类型 , 逻辑判别、下标、循环等内容有一定了解之后 , 才好开始编写函数 。
对于初学者来说 , 最好的方法就是研究现有的R函数 。因为R程序包都是开源的 , 所有代码可见 。
研究现有的R函数能够使编程水平迅速提高 。R函数无需首先声明变量的类型 , 大部分情况下不需要进行初始化 。
一个完整的R函数 , 需要包括函数名称 , 函数声明 , 函数参数以及函数体几部分 。1. 函数名称 , 即要编写的函数名称 , 这一名称就作为将来调用R函数的依据 。
2. 函数声明 , 包括 FALSE这样的逻辑类型变量 , 这就意味着 , if内部 , 往往是对条件的判别 , 例如 is.na, is.matrix, is.numeric等等 , 或者对大小的比较 , 如 , if(x > 0), if(x == 1), if(length(x)== 3)等等 。if后面 , 如果是1行 , 则花括号可以省略 , 否则就必须要将所有的语句都放在花括号中 。
这和循环是一致的 。例子: ## if与条件判断 fun.test 。
3. 删除字符的函数代码怎么写啊 int strlen(const char string)
{
int i=0;
while(string[i]) i++;
return i;
}
2. strcpy() ,  字符串拷贝.
char *strcpy(char *destination, const char *source)
{
while(*destinaton++=*source++);
return (destination-1);
}
3. strcat() ,  字符串的连接.
char *strcat(char *target,const char *source)
{
char *original=target;
while(*target) target++; // Find the end of the string
while(*target++=*source++);